summaryrefslogtreecommitdiff
path: root/lisp/cus-start.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-06-27 22:38:19 +0000
committerRichard M. Stallman <rms@gnu.org>1997-06-27 22:38:19 +0000
commit4db2b1c70f5f69c904d93df7d32e22864e2e0ea9 (patch)
tree1a1037bdb182478a02ceb7bddfe77a7fd163b321 /lisp/cus-start.el
parent7ce22b412650576014aa139443c27cb96e2d5ced (diff)
downloademacs-4db2b1c70f5f69c904d93df7d32e22864e2e0ea9.tar.gz
(double-click-time): Use restricted-sexp.
(load-path): Make [Current dir?] itself the active button.
Diffstat (limited to 'lisp/cus-start.el')
-rw-r--r--lisp/cus-start.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 00fe7e8c9be..a842f8d3541 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -109,7 +109,8 @@
(integer :format "%v")))
(echo-keystrokes minibuffer boolean)
(polling-period keyboard integer)
- (double-click-time mouse integer)
+ (double-click-time mouse (restricted-sexp
+ :match-alternatives (integerp 'nil 't)))
(inhibit-local-menu-bar-menus menu boolean)
(help-char keyboard character)
(help-event-list keyboard (repeat (sexp :format "%v")))
@@ -121,6 +122,7 @@
;; lread.c
(load-path environment
(repeat (choice :tag "[Current dir?]"
+ :format "%[Current dir?%] %v"
(const :tag " current dir" nil)
(directory :format "%v"))))
;; minibuf.c