comparison lisp/cus-start.el @ 83644:0ece58f6e0aa

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 803-813) - Update from CVS - Merge from emacs--rel--22 * emacs--rel--22 (patch 51-58) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 233-236) - Merge from emacs--devo--0 - Update from CVS Revision: emacs@sv.gnu.org/emacs--multi-tty--0--patch-25
author Miles Bader <miles@gnu.org>
date Sun, 15 Jul 2007 02:05:20 +0000
parents dc002877ce12 d6cb0c6eace7
children 65663fcd2caa
comparison
equal deleted inserted replaced
83643:70b38dec13a1 83644:0ece58f6e0aa
120 :value (undecided . undecided) 120 :value (undecided . undecided)
121 (cons :tag "Encoding/decoding pair" 121 (cons :tag "Encoding/decoding pair"
122 :value (undecided . undecided) 122 :value (undecided . undecided)
123 (coding-system :tag "Decoding") 123 (coding-system :tag "Decoding")
124 (coding-system :tag "Encoding")) 124 (coding-system :tag "Encoding"))
125 (coding-system :tag "Single coding system" 125 (coding-system
126 :value undecided) 126 :tag "Single coding system"
127 :value undecided
128 :match (lambda (widget value)
129 (and value (not (functionp value)))))
127 (function :value ignore)))) 130 (function :value ignore))))
128 (selection-coding-system mule coding-system) 131 (selection-coding-system mule coding-system)
129 ;; dired.c 132 ;; dired.c
130 (completion-ignored-extensions dired 133 (completion-ignored-extensions dired
131 (repeat (string :format "%v"))) 134 (repeat (string :format "%v")))
137 ;; editfns.c 140 ;; editfns.c
138 (user-full-name mail string) 141 (user-full-name mail string)
139 ;; eval.c 142 ;; eval.c
140 (max-specpdl-size limits integer) 143 (max-specpdl-size limits integer)
141 (max-lisp-eval-depth limits integer) 144 (max-lisp-eval-depth limits integer)
145 (max-mini-window-height limits
146 (choice (const :tag "quarter screen" nil)
147 number))
142 (stack-trace-on-error debug 148 (stack-trace-on-error debug
143 (choice (const :tag "off") 149 (choice (const :tag "off")
144 (repeat :menu-tag "When" 150 (repeat :menu-tag "When"
145 :value (nil) 151 :value (nil)
146 (symbol :format "%v")) 152 (symbol :format "%v"))