diff --git a/eliss.el b/eliss.el
index fbc948e..17dd625 100644
--- a/eliss.el
+++ b/eliss.el
@@ -24,7 +24,7 @@
      ,@body))
 (put 'with-eliss-http-params 'lisp-indent-function 2)
 
-(defun project-row (project)
+(defun eliss-project-row (project)
   "Print a table row for PROJECT."
   (let ((pname (substring project 0 -4)))
     `(tr (td (a (@ (href ,(concat "/" pname "/"))) ,pname)))))
@@ -56,7 +56,7 @@ container div."
    (eliss-page
     "project list"
     `(table (@ (class "table"))
-            ,@(mapcar #'project-row
+            ,@(mapcar #'eliss-project-row
                       (directory-files eliss-data-directory nil
                                        "\\.org$"))))))