diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2009-02-24 16:11:06 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2009-02-24 16:11:06 +0000 |
| commit | 5f0e32eae1c50252096197728a2f0d8641bfda60 (patch) | |
| tree | eb724716c0ebf98c130e858a542ecef073e03f3f /lisp/scroll-bar.el | |
| parent | a4bead12924447ab979dc70c922aaa2f4e44f90c (diff) | |
| download | emacs-5f0e32eae1c50252096197728a2f0d8641bfda60.tar.gz | |
* scroll-bar.el (scroll-bar-mode): Turn off scroll bars when
argument is 0. Doc fix. (Bug#1527)
Diffstat (limited to 'lisp/scroll-bar.el')
| -rw-r--r-- | lisp/scroll-bar.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el index 37e7c0b65ce..eed6921b7e7 100644 --- a/lisp/scroll-bar.el +++ b/lisp/scroll-bar.el @@ -117,15 +117,15 @@ Setting the variable with a customization buffer also takes effect." "Toggle display of vertical scroll bars on all frames. This command applies to all frames that exist and frames to be created in the future. -With a numeric argument, if the argument is negative, -turn off scroll bars; otherwise, turn on scroll bars." +With a numeric argument, if the argument is positive +turn on scroll bars; otherwise turn off scroll bars." (interactive "P") ;; Tweedle the variable according to the argument. (set-scroll-bar-mode (if (if (null flag) (not scroll-bar-mode) (setq flag (prefix-numeric-value flag)) - (or (not (numberp flag)) (>= flag 0))) + (or (not (numberp flag)) (> flag 0))) (or previous-scroll-bar-mode default-frame-scroll-bars)))) |