Commit 4db2b1c7 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(double-click-time): Use restricted-sexp.

(load-path): Make [Current dir?] itself the active button.
parent 7ce22b41
...@@ -109,7 +109,8 @@ ...@@ -109,7 +109,8 @@
(integer :format "%v"))) (integer :format "%v")))
(echo-keystrokes minibuffer boolean) (echo-keystrokes minibuffer boolean)
(polling-period keyboard integer) (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) (inhibit-local-menu-bar-menus menu boolean)
(help-char keyboard character) (help-char keyboard character)
(help-event-list keyboard (repeat (sexp :format "%v"))) (help-event-list keyboard (repeat (sexp :format "%v")))
...@@ -121,6 +122,7 @@ ...@@ -121,6 +122,7 @@
;; lread.c ;; lread.c
(load-path environment (load-path environment
(repeat (choice :tag "[Current dir?]" (repeat (choice :tag "[Current dir?]"
:format "%[Current dir?%] %v"
(const :tag " current dir" nil) (const :tag " current dir" nil)
(directory :format "%v")))) (directory :format "%v"))))
;; minibuf.c ;; minibuf.c
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment