Mercurial > emacs
diff lisp/scroll-bar.el @ 20061:fb0d3082b28c
(toggle-scroll-bar): Call prefix-numeric-value.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 15 Oct 1997 23:40:43 +0000 |
parents | af32e336d12c |
children | a68db1ead5cf |
line wrap: on
line diff
--- a/lisp/scroll-bar.el Wed Oct 15 23:36:30 1997 +0000 +++ b/lisp/scroll-bar.el Wed Oct 15 23:40:43 1997 +0000 @@ -126,7 +126,8 @@ (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)