Fix: (org-dblock-write:org-ql) cl-minusp
This commit is contained in:
parent
8e6aae95a0
commit
c0a10ba96a
1 changed files with 1 additions and 1 deletions
|
|
@ -286,7 +286,7 @@ For example, an org-ql dynamic block header could look like:
|
|||
:order-by sort)))
|
||||
(when take
|
||||
(setf elements (cl-etypecase take
|
||||
((and integer (satisfies minusp)) (-take-last (abs take) elements))
|
||||
((and integer (satisfies cl-minusp)) (-take-last (abs take) elements))
|
||||
(integer (-take take elements)))))
|
||||
(cl-labels ((format-element
|
||||
(element) (string-join (cl-loop for column in columns
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue