Mercurial > emacs
changeset 102985:3123154d96e0
* outline.el (hide-sublevels): Ensure that arguments are passed to
outline-flag-region in the correct order (Bug#3000).
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Wed, 15 Apr 2009 23:32:23 +0000 |
| parents | 3c287035dd2c |
| children | 02685d936706 |
| files | lisp/ChangeLog lisp/outline.el |
| diffstat | 2 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Apr 15 22:51:26 2009 +0000 +++ b/lisp/ChangeLog Wed Apr 15 23:32:23 2009 +0000 @@ -1,3 +1,8 @@ +2009-04-15 William Xu <william.xwl@gmail.com> + + * outline.el (hide-sublevels): Ensure that arguments are passed to + outline-flag-region in the correct order (Bug#3000). + 2009-04-15 Katsumi Yamaoka <yamaoka@jpl.org> * net/browse-url.el (browse-url-filename-alist): Correct file
--- a/lisp/outline.el Wed Apr 15 22:51:26 2009 +0000 +++ b/lisp/outline.el Wed Apr 15 23:32:23 2009 +0000 @@ -905,6 +905,8 @@ (goto-char (point-max)) ;; Keep empty last line, if available. (if (bolp) (1- (point)) (point))))) + (if (< end beg) + (setq beg (prog1 end (setq end beg)))) ;; First hide everything. (outline-flag-region beg end t) ;; Then unhide the top level headers.