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

Prune

Browse source
This commit is contained in:
Adam Porter 2018-01-03 11:20:04 -06:00
parent 29eec8ba25
commit 08ee9e1596
1 changed files with 0 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

10
org-agenda-ng.el
View file

@ -78,16 +78,6 @@
;;;; Functions ;;;; Functions
(cl-defun org-agenda-ng--heading-positions (file)
"Return list of heading positions in FILE."
(with-current-buffer (find-buffer-visiting file)
(save-excursion
(goto-char (point-min))
(cl-loop initially do (when (org-before-first-heading-p)
(outline-next-heading))
collect (point)
while (outline-next-heading)))))
(cl-defun org-agenda-ng--filter-buffer (&key pred) (cl-defun org-agenda-ng--filter-buffer (&key pred)
"Return positions of matching headings in current buffer. "Return positions of matching headings in current buffer.
Headings should return non-nil for any ANY-PREDS and nil for all Headings should return non-nil for any ANY-PREDS and nil for all