Преглед на файлове

org.el (org-set-tags-command): Fix bug.

* org.el (org-set-tags-command): Fix bug when setting tags for
multiple headlines in an active region.

Do not set the end of the region back to the beginning of the
previous headline.
Bastien Guerry преди 12 години
родител
ревизия
f8b15da24c
променени са 1 файла, в които са добавени 3 реда и са изтрити 1 реда
  1. 3 1
      lisp/org.el

+ 3 - 1
lisp/org.el

@@ -13603,7 +13603,9 @@ If ONOFF is `on' or `off', don't toggle but set to this state."
   (if (or (org-at-heading-p) (and arg (org-before-first-heading-p)))
       (org-set-tags arg just-align)
     (save-excursion
-      (org-back-to-heading t)
+      (unless (and (org-region-active-p)
+		   org-loop-over-headlines-in-active-region)
+	(org-back-to-heading t))
       (org-set-tags arg just-align))))
 
 (defun org-set-tags-to (data)