Fix fast tag selection affecting wrong line
* lisp/org.el (org-fast-tag-selection): Wrap `save-window-excursion' with `save-excursion'. In the case when the tags are changed remotely from the agenda, and the affected buffer is already visible in another window, the tag change was applied to the currently visible line in the target buffer, not the headline in the agenda.
This commit is contained in:
parent
e95ac0bac3
commit
d1ce59571f
|
@ -14564,6 +14564,7 @@ Returns the new tags string, or nil to not change the current settings."
|
|||
" "
|
||||
(make-string (- org-tags-column (current-column)) ?\ ))))))
|
||||
(move-overlay org-tags-overlay ov-start ov-end)
|
||||
(save-excursion
|
||||
(save-window-excursion
|
||||
(if expert
|
||||
(set-buffer (get-buffer-create " *Org tags*"))
|
||||
|
@ -14725,7 +14726,7 @@ Returns the new tags string, or nil to not change the current settings."
|
|||
(delete-overlay org-tags-overlay)
|
||||
(if rtn
|
||||
(mapconcat 'identity current ":")
|
||||
nil))))
|
||||
nil)))))
|
||||
|
||||
(defun org-make-tag-string (tags)
|
||||
"Return string associated to TAGS.
|
||||
|
|
Loading…
Reference in New Issue