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

chore: undo white space changes

Browse source
This commit is contained in:
OZoneGuy 2024-01-07 18:11:14 -05:00
parent 59e4a831c0
commit c632500727
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
org-ql-search.el
View file

@ -229,10 +229,10 @@ automatically from the query."
('nil (org-agenda-files nil 'ifmode)) ('nil (org-agenda-files nil 'ifmode))
(_ (prog1 org-agenda-restrict (_ (prog1 org-agenda-restrict
(with-current-buffer org-agenda-restrict (with-current-buffer org-agenda-restrict
;; Narrow the buffer; remember to widen it later. ;; Narrow the buffer; remember to widen it later.
(setf old-beg (point-min) old-end (point-max) (setf old-beg (point-min) old-end (point-max)
narrow-p t) narrow-p t)
(narrow-to-region org-agenda-restrict-begin org-agenda-restrict-end)))))) (narrow-to-region org-agenda-restrict-begin org-agenda-restrict-end))))))
(items (org-ql-select from query (items (org-ql-select from query
:action 'element-with-markers :action 'element-with-markers
:narrow narrow-p))) :narrow narrow-p)))