Mercurial > hg > xemacs-beta
comparison lisp/cus-start.el @ 278:90d73dddcdc4 r21-0b37
Import from CVS: tag r21-0b37
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:31:29 +0200 |
parents | 2c611d1463a6 |
children | 74fd4e045ea6 |
comparison
equal
deleted
inserted
replaced
277:cfdf3ff11843 | 278:90d73dddcdc4 |
---|---|
119 :format "%t\n"))) | 119 :format "%t\n"))) |
120 (fill-column fill integer) | 120 (fill-column fill integer) |
121 (left-margin fill integer) | 121 (left-margin fill integer) |
122 (tab-width editing-basics integer) | 122 (tab-width editing-basics integer) |
123 (truncate-lines display boolean) | 123 (truncate-lines display boolean) |
124 (overwrite-mode editing-basics ;; for the options menu - dverna | |
125 (choice (const :tag "disabled" nil) | |
126 (const :tag "textual" | |
127 'overwrite-mode-textual) | |
128 (const :tag "binary" | |
129 'overwrite-mode-binary))) | |
124 ;; not documented as user-options, but should still be | 130 ;; not documented as user-options, but should still be |
125 ;; customizable: | 131 ;; customizable: |
126 (bar-cursor display (choice (const :tag "Block Cursor" nil) | 132 (bar-cursor display (choice (const :tag "Block Cursor" nil) |
127 (const :tag "Bar Cursor (1 pixel)" t) | 133 (const :tag "Bar Cursor (1 pixel)" t) |
128 (sexp :tag "Bar Cursor (2 pixels)" | 134 (sexp :tag "Bar Cursor (2 pixels)" |