(toggle-scroll-bar): Call prefix-numeric-value.

diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el
index 6a26606..ccdf349 100644 (file)
--- 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)