summaryrefslogtreecommitdiff
path: root/lisp/outline.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-04-15 23:32:23 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-04-15 23:32:23 +0000
commit3d0dd8ff4a6681225b4e64728c820833c61773f7 (patch)
tree6fae25f488d102957cf48a3514f3d0fa3e3cd18a /lisp/outline.el
parentdee8ac108452e32efb8c4542f4509c69c0e27d45 (diff)
downloademacs-3d0dd8ff4a6681225b4e64728c820833c61773f7.tar.gz
* outline.el (hide-sublevels): Ensure that arguments are passed to
outline-flag-region in the correct order (Bug#3000).
Diffstat (limited to 'lisp/outline.el')
-rw-r--r--lisp/outline.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/outline.el b/lisp/outline.el
index e1e91271883..250f2e16335 100644
--- a/lisp/outline.el
+++ b/lisp/outline.el
@@ -905,6 +905,8 @@ Show the heading too, if it is currently invisible."
(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.