Fix: (org-ql-refile) Use base buffer

Should probably release this in a v0.8.10.

See #466.
This commit is contained in:
Adam Porter 2024-09-16 13:42:17 -05:00
parent d574b60551
commit fff110acde
3 changed files with 64 additions and 59 deletions

View file

@ -567,6 +567,7 @@ Simple links may also be written manually in either sexp or non-sexp form, like:
*Fixes* *Fixes*
+ Customization group for face ~org-ql-view-due-date~. + Customization group for face ~org-ql-view-due-date~.
+ Command ~org-ql-refile~ uses the base buffer when refiling to an indirect buffer.
*** helm-org-ql *** helm-org-ql

View file

@ -122,18 +122,20 @@ which see (but only the files are used)."
((and (pred listp) files) files))) ((and (pred listp) files) files)))
(list files-spec))))))) (list files-spec)))))))
(list (org-ql-completing-read buffers-files :prompt "Refile to: ")))) (list (org-ql-completing-read buffers-files :prompt "Refile to: "))))
(org-refile nil nil (let ((buffer (or (buffer-base-buffer (marker-buffer marker))
;; The RFLOC argument: (marker-buffer marker))))
(list (org-refile nil nil
;; Name ;; The RFLOC argument:
(org-with-point-at marker (list
(nth 4 (org-heading-components))) ;; Name
;; File (org-with-point-at marker
(buffer-file-name (marker-buffer marker)) (nth 4 (org-heading-components)))
;; nil ;; File
nil (buffer-file-name buffer)
;; Position ;; nil
marker))) nil
;; Position
marker))))
;;;###autoload ;;;###autoload
(defun org-ql-find-in-agenda () (defun org-ql-find-in-agenda ()

View file

@ -1110,6 +1110,8 @@ File: README.info, Node: 09-pre, Next: 089, Up: Changelog
*Fixes* *Fixes*
• Customization group for face org-ql-view-due-date. • Customization group for face org-ql-view-due-date.
• Command org-ql-refile uses the base buffer when refiling to an
indirect buffer.
* Menu: * Menu:
@ -2155,53 +2157,53 @@ Node: Links39051
Node: Tips39738 Node: Tips39738
Node: Changelog40062 Node: Changelog40062
Node: 09-pre41029 Node: 09-pre41029
Node: helm-org-ql (1)41878 Node: helm-org-ql (1)41976
Node: 08942019 Node: 08942117
Node: 08843161 Node: 08843259
Node: 08744237 Node: 08744335
Node: 08645465 Node: 08645563
Node: 08545699 Node: 08545797
Node: 08446355 Node: 08446453
Node: 08346807 Node: 08346905
Node: 08247148 Node: 08247246
Node: 08147541 Node: 08147639
Node: 0847964 Node: 0848062
Node: 07450690 Node: 07450788
Node: 07350915 Node: 07351013
Node: 07251649 Node: 07251747
Node: 07152570 Node: 07152668
Node: 0753381 Node: 0753479
Node: 06356247 Node: 06356345
Node: 06256780 Node: 06256878
Node: 06157087 Node: 06157185
Node: 0657657 Node: 0657755
Node: 05260713 Node: 05260811
Node: 05161015 Node: 05161113
Node: 0561440 Node: 0561538
Node: 04962971 Node: 04963069
Node: 04863253 Node: 04863351
Node: 04763602 Node: 04763700
Node: 04664011 Node: 04664109
Node: 04564419 Node: 04564517
Node: 04464780 Node: 04464878
Node: 04365139 Node: 04365237
Node: 04265342 Node: 04265440
Node: 04165503 Node: 04165601
Node: 0465750 Node: 0465848
Node: 03269851 Node: 03269949
Node: 03170254 Node: 03170352
Node: 0370451 Node: 0370549
Node: 02373751 Node: 02373849
Node: 02273985 Node: 02274083
Node: 02174265 Node: 02174363
Node: 0274470 Node: 0274568
Node: 0178548 Node: 0178646
Node: Development78649 Node: Development78747
Node: Copyright assignment78882 Node: Copyright assignment78980
Node: Notes79472 Node: Notes79570
Node: Comparison with Org Agenda searches79636 Node: Comparison with Org Agenda searches79734
Node: org-sidebar80525 Node: org-sidebar80623
Node: License80804 Node: License80902
 
End Tag Table End Tag Table