summaryrefslogtreecommitdiff
path: root/lisp/cus-start.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-08-13 00:42:51 -0700
committerGlenn Morris <rgm@gnu.org>2013-08-13 00:42:51 -0700
commitf0024d8c0dbe5dcb2551bf2433af39ffe7cb8f7a (patch)
tree325046b1f3fb9cffa88ac99ce51a16eb5edc0c76 /lisp/cus-start.el
parentae3f0661b3baf53dec77c14b9b54530094f09904 (diff)
Fix some custom types
* lisp/cus-start.el (truncate-partial-width-windows): Fix type. * lisp/emulation/viper-init.el (viper-search-scroll-threshold): Fix type. * lisp/mail/feedmail.el (feedmail-confirm-outgoing) (feedmail-display-full-frame, feedmail-deduce-bcc-where): Fix types. * admin/admin.el: Related comments.
Diffstat (limited to 'lisp/cus-start.el')
-rw-r--r--lisp/cus-start.el7
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index cf94b6300dd..24f8ac3bade 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -457,7 +457,12 @@ since it could result in memory overflow and make Emacs crash."
(scroll-margin windows integer)
(hscroll-margin windows integer "22.1")
(hscroll-step windows number "22.1")
- (truncate-partial-width-windows display boolean "23.1")
+ (truncate-partial-width-windows
+ display
+ (choice (integer :tag "Truncate if narrower than")
+ (const :tag "Respect `truncate-lines'" nil)
+ (other :tag "Truncate if not full-width" t))
+ "23.1")
(make-cursor-line-fully-visible windows boolean)
(mode-line-in-non-selected-windows mode-line boolean "22.1")
(line-number-display-limit display