diff options
Diffstat (limited to 'lisp/scroll-bar.el')
| -rw-r--r-- | lisp/scroll-bar.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/scroll-bar.el b/lisp/scroll-bar.el index 058d83a97bc..c6c7d7ddb8d 100644 --- a/lisp/scroll-bar.el +++ b/lisp/scroll-bar.el @@ -123,9 +123,10 @@ the mode if ARG is omitted or nil. This command applies to all frames that exist and frames to be created in the future." - :variable (eq (get-scroll-bar-mode) - (or previous-scroll-bar-mode - default-frame-scroll-bars))) + :variable ((get-scroll-bar-mode) + . (lambda (v) (set-scroll-bar-mode + (if v (or previous-scroll-bar-mode + default-frame-scroll-bars)))))) (defun toggle-scroll-bar (arg) "Toggle whether or not the selected frame has vertical scroll bars. |