From: Kim F. Storm <storm@cua.dk>
Date: Sun, 8 Apr 2007 22:02:42 +0000 (+0000)
Subject: 2007-04-08  Martin Rudalics  <rudalics@gmx.at>
X-Git-Tag: emacs-pretest-22.0.98~189
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7704b6b1329eecfb27f0d4ecadf15c68205a0cfb;p=emacs.git

2007-04-08  Martin Rudalics  <rudalics@gmx.at>

* cus-start.el <scroll-preserve-screen-position>: Add choices.
---

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index da2f0a54c2c..61f073119e7 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -338,7 +338,11 @@ since it could result in memory overflow and make Emacs crash."
 	     (split-height-threshold windows integer)
 	     (window-min-height windows integer)
 	     (window-min-width windows integer)
-	     (scroll-preserve-screen-position windows boolean)
+ 	     (scroll-preserve-screen-position
+ 	      windows (choice
+ 		       (const :tag "Off (nil)" :value nil)
+ 		       (const :tag "Full screen (t)" :value t)
+ 		       (other :tag "Always" 1)))
 	     (display-buffer-reuse-frames windows boolean "21.1")
 	     ;; xdisp.c
 	     (scroll-step windows integer)