ryuslash/eliss
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add docstring to eliss-data-directory

Browse source
This commit is contained in:
Tom Willemse 2013-05-19 03:06:37 +02:00
parent 113b8f3076
commit f4d37d1178
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
eliss.el
View file

@ -13,6 +13,9 @@
;;; Code: ;;; Code:
(defvar eliss-data-directory "~/projects/eliss/projects"
"The location of the project org files.")
(defmacro with-eliss-http-params (params httpcon &rest body) (defmacro with-eliss-http-params (params httpcon &rest body)
"Bind parameters PARAMS from HTTPCON and execute BODY." "Bind parameters PARAMS from HTTPCON and execute BODY."
`(let (,@(mapcar (lambda (p) `(let (,@(mapcar (lambda (p)
@ -21,8 +24,6 @@
,@body)) ,@body))
(put 'with-eliss-http-params 'lisp-indent-function 2) (put 'with-eliss-http-params 'lisp-indent-function 2)
(defvar eliss-data-directory "~/projects/eliss/projects")
(defun project-row (project) (defun project-row (project)
"Print a table row for PROJECT." "Print a table row for PROJECT."
(let ((pname (substring project 0 -4))) (let ((pname (substring project 0 -4)))