# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 744671025 0
# Node ID abb585cf9188fac5f2e56977be197d3e62f5a688
# Parent  5e9224dac45287343d35931d0c9bd5ef58437512
(scroll-bar-mode): If FLAG is non-nil, set it to its prefix-numeric-value.

diff -r 5e9224dac452 -r abb585cf9188 lisp/scroll-bar.el
--- 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