comparison lisp/prim/cus-start.el @ 142:1856695b1fa9 r20-2b5

Import from CVS: tag r20-2b5
author cvs
date Mon, 13 Aug 2007 09:33:18 +0200
parents 9b50b4588a93
children 25f70ba0133c
comparison
equal deleted inserted replaced
141:ea67ad3963dc 142:1856695b1fa9
27 (characterp sexp))) 27 (characterp sexp)))
28 sexp 28 sexp
29 (list 'quote sexp))) 29 (list 'quote sexp)))
30 30
31 ;; The file names below are unreliable, as they are from Emacs 19.34. 31 ;; The file names below are unreliable, as they are from Emacs 19.34.
32 (let ((all '(;; abbrev.c 32 (let ((all '(;; boolean
33 (abbrev-all-caps abbrev-mode boolean) 33 (abbrev-all-caps abbrev boolean)
34 (pre-abbrev-expand-hook abbrev-mode hook) 34 (allow-deletion-of-last-visible-frame frames boolean)
35 ;; alloc.c 35 (debug-on-quit debug boolean)
36 (delete-auto-save-files auto-save boolean)
37 (delete-exited-processes processes-basics boolean)
38 (indent-tabs-mode editing-basics boolean)
39 (load-ignore-elc-files maint boolean)
40 (load-warn-when-source-newer maint boolean)
41 (load-warn-when-source-only maint boolean)
42 (modifier-keys-are-sticky keyboard boolean)
43 (no-redraw-on-reenter display boolean)
44 (scroll-on-clipped-lines display boolean)
45 (truncate-partial-width-windows display boolean)
46 (visible-bell sound boolean)
47 (x-allow-sendevents x boolean)
48 (zmacs-regions editing-basics boolean)
49 ;; integer
50 (auto-save-interval auto-save integer)
51 (bell-volume sound integer)
52 (echo-keystrokes keyboard integer)
36 (gc-cons-threshold alloc integer) 53 (gc-cons-threshold alloc integer)
37 ;; buffer.c 54 (next-screen-context-lines display integer)
38 (modeline-format modeline sexp) ;Hard to do right. 55 (scroll-step windows integer)
39 (default-major-mode internal function) 56 (window-min-height windows integer)
57 (window-min-width windows integer)
58 ;; object
59 (auto-save-file-format auto-save
60 (choice (const :tag "Normal" t)
61 (repeat (symbol :tag "Format"))))
62 (completion-ignored-extensions minibuffer
63 (repeat
64 (string :format "%v")))
65 (debug-on-error debug (choice (const :tag "off" nil)
66 (const :tag "Always" t)
67 (repeat :menu-tag "When"
68 :value (nil)
69 (symbol
70 :tag "Condition"))))
71 (debug-on-signal debug (choice (const :tag "off" nil)
72 (const :tag "Always" t)
73 (repeat :menu-tag "When"
74 :value (nil)
75 (symbol
76 :tag "Condition"))))
77 (exec-path processes-basics (repeat
78 (choice :tag "Directory"
79 (const :tag "Default" nil)
80 (directory :format "%v"))))
81 (file-name-handler-alist data (repeat
82 (cons regexp
83 (function :tag "Handler"))))
84 (shell-file-name execute file)
85 (stack-trace-on-error debug (choice (const :tag "off" nil)
86 (const :tag "Always" t)
87 (repeat :menu-tag "When"
88 :value (nil)
89 (symbol
90 :tag "Condition"))))
91 (stack-trace-on-signal debug (choice (const :tag "off" nil)
92 (const :tag "Always" t)
93 (repeat :menu-tag "When"
94 :value (nil)
95 (symbol
96 :tag "Condition"))))
97 ;; buffer-local
40 (case-fold-search matching boolean) 98 (case-fold-search matching boolean)
99 (ctl-arrow display (choice (integer 160)
100 (sexp :tag "160 (default)"
101 :format "%t\n")))
41 (fill-column fill integer) 102 (fill-column fill integer)
42 (left-margin fill integer) 103 (left-margin fill integer)
43 (tab-width editing-basics integer) 104 (tab-width editing-basics integer)
44 (ctl-arrow display boolean)
45 (truncate-lines display boolean) 105 (truncate-lines display boolean)
106 ;; not documented as user-options, but should still be
107 ;; customizable:
108 (default-frame-plist frames (repeat
109 (list :inline t
110 :format "%v"
111 (symbol :tag "Parameter")
112 (sexp :tag "Value"))))
113 (help-char keyboard character)
114 (max-lisp-eval-depth limits integer)
115 (max-specpdl-size limits integer)
116 (meta-prefix-char keyboard character)
117 (parse-sexp-ignore-comments editing-basics boolean)
46 (selective-display display 118 (selective-display display
47 (choice (const :tag "off" nil) 119 (choice (const :tag "off" nil)
48 (integer :tag "space" 120 (integer :tag "space"
49 :format "%v" 121 :format "%v"
50 1) 122 1)
51 (const :tag "on" t))) 123 (const :tag "on" t)))
52 (selective-display-ellipses display boolean) 124 (selective-display-ellipses display boolean)
53 ;; callproc.c 125 (signal-error-on-buffer-boundary internal boolean)
54 (shell-file-name execute file)
55 (exec-path execute
56 (repeat (choice (const :tag "default" nil)
57 (file :format "%v"))))
58 ;; dired.c
59 (completion-ignored-extensions dired
60 (repeat (string :format "%v")))
61 ;; dispnew.el
62 (visible-bell display boolean)
63 (no-redraw-on-reenter display boolean)
64 ;; eval.c
65 (max-specpdl-size limits integer)
66 (max-lisp-eval-depth limits integer)
67 (stack-trace-on-error debug
68 (choice (const :tag "off")
69 (repeat :menu-tag "When"
70 :value (nil)
71 (symbol :format "%v"))
72 (const :tag "always" t)))
73 (debug-on-error debug
74 (choice (const :tag "off")
75 (repeat :menu-tag "When"
76 :value (nil)
77 (symbol :format "%v"))
78 (const :tag "always" t)))
79 (debug-on-quit debug choice)
80 ;; frame.c
81 (default-frame-plist frames
82 (repeat (cons :format "%v"
83 (symbol :tag "Parameter")
84 (sexp :tag "Value"))))
85 ;; indent.c
86 (indent-tabs-mode fill boolean)
87 ;; keyboard.c
88 (meta-prefix-char keyboard character)
89 (auto-save-interval auto-save integer)
90 (echo-keystrokes minibuffer boolean)
91 (help-char keyboard character)
92 ;; lread.c
93 (load-path environment
94 (repeat (choice :tag "Directory"
95 (const :tag "default" nil)
96 (directory :format "%v"))))
97 ;; process.c
98 (delete-exited-processes proces-basics boolean)
99 ;; syntax.c
100 (parse-sexp-ignore-comments editing-basics boolean)
101 (words-include-escapes editing-basics boolean) 126 (words-include-escapes editing-basics boolean)
102 ;; window.c 127 (temp-buffer-show-function
103 (temp-buffer-show-function windows function) 128 windows (radio (function-item :tag "Temp Buffers Always in Same Frame"
104 (next-screen-context-lines windows boolean) 129 :format "%t\n"
105 (window-min-height windows integer) 130 show-temp-buffer-in-current-frame)
106 (window-min-width windows integer) 131 (const :tag "Temp Buffers Like Other Buffers" nil)
107 ;; xdisp.c 132 (function :tag "Other")))))
108 (scroll-step windows integer)
109 (truncate-partial-width-windows display boolean)
110 ;; xfns.c
111 (x-bitmap-file-path installation
112 (repeat (directory :format "%v")))))
113 this symbol group type) 133 this symbol group type)
114 (while all 134 (while all
115 (setq this (car all) 135 (setq this (car all)
116 all (cdr all) 136 all (cdr all)
117 symbol (nth 0 this) 137 symbol (nth 0 this)