changeset 4469:abb585cf9188

(scroll-bar-mode): If FLAG is non-nil, set it to its prefix-numeric-value.
author Roland McGrath <roland@gnu.org>
date Fri, 06 Aug 1993 21:03:45 +0000
parents 5e9224dac452
children 6dd518d1f5aa
files lisp/scroll-bar.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/scroll-bar.el	Fri Aug 06 20:29:23 1993 +0000
+++ b/lisp/scroll-bar.el	Fri Aug 06 21:03:45 1993 +0000
@@ -56,6 +56,7 @@
 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