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

Use spaces for indentation

Browse source
This commit is contained in:
Ihor Radchenko 2020-12-07 14:49:43 +08:00
parent 7ecb80fca9
commit 555ae98eb8
1 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

10
helm-org-ql.el
View file

@ -179,12 +179,12 @@ Is transformed into this query:
;; Expansion of `helm-build-sync-source' macro. ;; Expansion of `helm-build-sync-source' macro.
(helm-make-source name 'helm-source-sync (helm-make-source name 'helm-source-sync
:filtered-candidate-transformer (lambda (candidates _) :filtered-candidate-transformer (lambda (candidates _)
(let ((window-width (window-width (helm-window)))) (let ((window-width (window-width (helm-window))))
(mapcar (lambda (marker) (mapcar (lambda (marker)
(unless (markerp marker) (user-error "Unexpected candidate for `helm-org-ql-source'")) (unless (markerp marker) (user-error "Unexpected candidate for `helm-org-ql-source'"))
(org-with-point-at marker (org-with-point-at marker
(helm-org-ql--heading window-width))) (helm-org-ql--heading window-width)))
candidates))) candidates)))
:candidates (lambda () :candidates (lambda ()
(let* ((query (org-ql--query-string-to-sexp helm-pattern))) (let* ((query (org-ql--query-string-to-sexp helm-pattern)))
(when query (when query