diff options
| author | Roland McGrath <roland@gnu.org> | 1993-08-06 21:03:45 +0000 |
|---|---|---|
| committer | Roland McGrath <roland@gnu.org> | 1993-08-06 21:03:45 +0000 |
| commit | 6ee9f9535837446ff3e051c82653b7aef4b95331 (patch) | |
| tree | a6e0137fc1fae7ded2024cbb8da2ca1bc6a3a543 /lisp/scroll-bar.el | |
| parent | e0568e86372b137dd87b058d0d2b43411c9993d9 (diff) | |
| download | emacs-6ee9f9535837446ff3e051c82653b7aef4b95331.tar.gz | |
(scroll-bar-mode): If FLAG is non-nil, set it to its prefix-numeric-value.
Diffstat (limited to 'lisp/scroll-bar.el')
| -rw-r--r-- | lisp/scroll-bar.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el index 8fd62f02898..462fdad55ae 100644 --- a/lisp/scroll-bar.el +++ b/lisp/scroll-bar.el @@ -56,6 +56,7 @@ created in the future. With a numeric argument, if the argument is negative, turn off scroll bars; otherwise, turn on scroll bars." (interactive "P") + (if flag (setq flag (prefix-numeric-value flag))) ;; Obtain the current setting by looking at default-frame-alist. (let ((scroll-bar-mode |