jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Tidy: Docstring

Browse source
This commit is contained in:
Adam Porter 2019-07-16 18:50:06 -05:00
parent 9648dd12f9
commit c6250d1ee2
1 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

8
org-ql.el
View file

@ -67,7 +67,13 @@ This list should not contain any duplicates.")
;;;; Macros ;;;; Macros
(cl-defmacro org-ql--defpredicate (name args docstring &rest body) (cl-defmacro org-ql--defpredicate (name args docstring &rest body)
"FIXME: docstring" "Define an `org-ql' selector predicate named `org-ql--predicate-NAME'.
ARGS is a `cl-defun'-style argument list. DOCSTRING is the
function's docstring. BODY is the body of the predicate.
Predicates will be called with point on the beginning of an Org
heading and should return non-nil if the heading's entry is a
match."
(declare (debug (symbolp listp stringp def-body)) (declare (debug (symbolp listp stringp def-body))
(indent defun)) (indent defun))
(let ((fn-name (intern (concat "org-ql--predicate-" (symbol-name name)))) (let ((fn-name (intern (concat "org-ql--predicate-" (symbol-name name))))