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

outline-end-of-subtree: Bugfix.

Advise this function in a way that prevents any trailing character from
being displayed.  Patch by Andreas Burtzlaff <andy13@gmx.net>.
Bastien Guerry преди 15 години
родител
ревизия
3f640c191a
променени са 2 файла, в които са добавени 6 реда и са изтрити 1 реда
  1. 5 0
      lisp/ChangeLog
  2. 1 1
      lisp/org.el

+ 5 - 0
lisp/ChangeLog

@@ -1,3 +1,8 @@
+2009-09-07  Andreas Burtzlaff <andy13@gmx.net>  (tiny change)
+
+	* org.el (outline-end-of-subtree): Bugfix: advise this function in
+	a way that prevents any trailing character from being displayed.
+
 2009-09-07  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* org-agenda.el (org-agenda-menu): Fix bugs in the bulk action

+ 1 - 1
lisp/org.el

@@ -16880,7 +16880,7 @@ If there is no such heading, return nil."
   (if (eq major-mode 'org-mode)
       (progn
 	(org-end-of-subtree nil t)
-	(backward-char 1))
+	(unless (eobp) (backward-char 1)))
     ad-do-it))
 
 (defun org-forward-same-level (arg &optional invisible-ok)