summaryrefslogtreecommitdiff
path: root/lisp/cus-start.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2017-05-19 10:01:23 +0300
committerEli Zaretskii <eliz@gnu.org>2017-05-19 10:01:23 +0300
commitdf9bec3b39b12b33db8f5a97d86797f6636e5e7d (patch)
tree673002a833d8b08917619120eb1c5c2bb5514254 /lisp/cus-start.el
parent7e3e51f4e288379be6a8731b739b63b9386940f7 (diff)
downloademacs-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/cus-start.el')
-rw-r--r--lisp/cus-start.el10
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)