summaryrefslogtreecommitdiff
path: root/lisp/scroll-bar.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/scroll-bar.el')
-rw-r--r--lisp/scroll-bar.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index 6a2660626d1..ccdf34909c7 100644
--- a/lisp/scroll-bar.el
+++ b/lisp/scroll-bar.el
@@ -126,7 +126,8 @@ when they are turned on; if it is nil, they go on the left."
(setq arg
(if (cdr (assq 'vertical-scroll-bars
(frame-parameters (selected-frame))))
- -1 1)))
+ -1 1))
+ (setq arg (prefix-numeric-value arg)))
(modify-frame-parameters (selected-frame)
(list (cons 'vertical-scroll-bars
(if (> arg 0)