Mercurial > emacs
comparison lisp/hilit-chg.el @ 43132:0dd2ebecd217
(highlight-changes-active-string): Default to +Chg.
(highlight-changes-passive-string): Default to -Chg.
(highlight-changes-global-modes): Doc fix.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 06 Feb 2002 15:32:16 +0000 |
parents | 90bce6424b8b |
children | 385762249723 |
comparison
equal
deleted
inserted
replaced
43131:0c878a7e5de7 | 43132:0dd2ebecd217 |
---|---|
261 :type '(choice (const :tag "Active" active) | 261 :type '(choice (const :tag "Active" active) |
262 (const :tag "Passive" passive)) | 262 (const :tag "Passive" passive)) |
263 :group 'highlight-changes) | 263 :group 'highlight-changes) |
264 | 264 |
265 ;; The strings displayed in the mode-line for the minor mode: | 265 ;; The strings displayed in the mode-line for the minor mode: |
266 (defcustom highlight-changes-active-string nil | 266 (defcustom highlight-changes-active-string " +Chg" |
267 "*The string used when Highlight Changes mode is in the active state. | 267 "*The string used when Highlight Changes mode is in the active state. |
268 This should be set to nil if no indication is desired, or to | 268 This should be set to nil if no indication is desired, or to |
269 a string with a leading space." | 269 a string with a leading space." |
270 :type '(choice string | 270 :type '(choice string |
271 (const :tag "None" nil)) | 271 (const :tag "None" nil)) |
272 :group 'highlight-changes) | 272 :group 'highlight-changes) |
273 | 273 |
274 (defcustom highlight-changes-passive-string " Chg" | 274 (defcustom highlight-changes-passive-string " -Chg" |
275 "*The string used when Highlight Changes mode is in the passive state. | 275 "*The string used when Highlight Changes mode is in the passive state. |
276 This should be set to nil if no indication is desired, or to | 276 This should be set to nil if no indication is desired, or to |
277 a string with a leading space." | 277 a string with a leading space." |
278 :type '(choice string | 278 :type '(choice string |
279 (const :tag "None" nil)) | 279 (const :tag "None" nil)) |
280 :group 'highlight-changes) | 280 :group 'highlight-changes) |
281 | 281 |
282 (defcustom highlight-changes-global-modes t | 282 (defcustom highlight-changes-global-modes t |
283 "*Determine whether a buffer is suitable for global Highlight Changes mode. | 283 "*Determine whether a buffer is suitable for global Highlight Changes mode. |
284 | 284 |
285 A function means that function is called: if it returns non-nil, the | 285 A function means call that function to decide: if it returns non-nil, |
286 buffer is suitable. | 286 the buffer is suitable. |
287 | 287 |
288 A list is a list of modes for which it is suitable, or a list whose | 288 A list means the elements are major modes suitable for Highlight |
289 first element is `not' followed by modes which are not suitable. | 289 Changes mode, or a list whose first element is `not' followed by major |
290 | 290 modes which are not suitable. |
291 t means the buffer is suitable if its name does not begin with ` ' nor | 291 |
292 `*' and the buffer has a filename. | 292 t means the buffer is suitable if it is visiting a file and its name |
293 does not begin with ` ' or `*'. | |
293 | 294 |
294 A value of nil means no buffers are suitable for `global-highlight-changes' | 295 A value of nil means no buffers are suitable for `global-highlight-changes' |
295 \(effectively disabling the mode). | 296 \(effectively disabling the mode). |
296 | 297 |
297 Examples: | 298 Examples: |