diff options
author | Eli Zaretskii <eliz@gnu.org> | 2017-05-19 10:01:23 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2017-05-19 10:01:23 +0300 |
commit | df9bec3b39b12b33db8f5a97d86797f6636e5e7d (patch) | |
tree | 673002a833d8b08917619120eb1c5c2bb5514254 /lisp | |
parent | 7e3e51f4e288379be6a8731b739b63b9386940f7 (diff) | |
download | emacs-df9bec3b39b12b33db8f5a97d86797f6636e5e7d.tar.gz |
Adjust defcustom form for 'auto-hscroll-mode'
* lisp/cus-start.el (standard) <auto-hscroll-mode>: Adjust the
defcustom form. Suggested by Stephen Berman <stephen.berman@gmx.net>.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/cus-start.el | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el index 117b23debef..e11f749556b 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -556,7 +556,15 @@ since it could result in memory overflow and make Emacs crash." (const :tag "Text-image-horiz" :value text-image-horiz) (const :tag "System default" :value nil)) "24.1") (tool-bar-max-label-size frames integer "24.1") - (auto-hscroll-mode scrolling boolean "21.1") + (auto-hscroll-mode scrolling + (choice + (const :tag "Don't scroll automatically" + :value nil) + (const :tag "Scroll the entire window" + :value t) + (const :tag "Scroll only the current line" + :value 'current-line)) + "26.1") (void-text-area-pointer cursor (choice (const :tag "Standard (text pointer)" :value nil) |