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

Docs: Update docstrings

Browse source 
To comply with checkdoc.
This commit is contained in:
Adam Porter 2019-07-16 13:49:41 -05:00
parent 04725bb900
commit 42138e2673
2 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

6
org-ql.el
View file

@ -355,7 +355,7 @@ from within ELEMENT's buffer."
element))
(defun org-ql--sanity-check-form (form)
"Signal an error if any of the forms in BODY do not have their preconditions met.
"Signal error if any forms in FORM do not have preconditions met.
Or, when possible, fix the problem."
(cl-flet ((check (symbol)
(cl-case symbol
@ -535,7 +535,7 @@ comparator, PRIORITY should be a priority string."
(org-ql--defpredicate property (property &optional value)
"Return non-nil if current entry has PROPERTY (a string), and optionally VALUE (a string)."
(pcase property
('nil (user-error "Property matcher requires a PROPERTY argument."))
('nil (user-error "Property matcher requires a PROPERTY argument"))
(_ (pcase value
('nil
;; Check that PROPERTY exists
@ -860,7 +860,7 @@ A and B are Org headline elements. TYPE should be a symbol like
(org-element-property type b)))
(defun org-ql--date< (a b)
"Return non-nil if A's deadline or scheduled element property is earlier than B's.
"Return non-nil if A's deadline or scheduled property is earlier than B's.
Deadline is considered before scheduled."
(cl-macrolet ((ts (item)
`(or (org-element-property :deadline ,item)