(org-columns-eval): Use forward-line.

This commit is contained in:
Thien-Thi Nguyen 2007-10-18 16:07:35 +00:00
parent dc11adf6bf
commit e73ea842b7
2 changed files with 3 additions and 2 deletions

View file

@ -2,6 +2,8 @@
* textmodes/artist.el (artist-previous-line, artist-next-line):
* dired.el (dired-next-line, dired-previous-line):
* progmodes/delphi.el (delphi-newline):
* textmodes/org.el (org-columns-eval):
Use forward-line.
2007-10-18 Juanma Barranquero <lekktu@gmail.com>

View file

@ -15050,8 +15050,7 @@ Where possible, use the standard interface for changing this line."
(defun org-columns-eval (form)
(let (hidep)
(save-excursion
(beginning-of-line 1)
(next-line 1)
(forward-line 1)
(setq hidep (org-on-heading-p 1)))
(eval form)
(and hidep (hide-entry))))