Mercurial > emacs
comparison lisp/gnus/gnus-score.el @ 23362:4882e505ccbc
(gnus-orphan-score, gnus-score-default-header, gnus-score-default-type):
Fix type.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Thu, 01 Oct 1998 20:46:42 +0000 |
| parents | c760c9b2e5bf |
| children | 15fc6acbae7a |
comparison
equal
deleted
inserted
replaced
| 23361:86b5dc6c12f5 | 23362:4882e505ccbc |
|---|---|
| 134 :type 'boolean) | 134 :type 'boolean) |
| 135 | 135 |
| 136 (defcustom gnus-orphan-score nil | 136 (defcustom gnus-orphan-score nil |
| 137 "*All orphans get this score added. Set in the score file." | 137 "*All orphans get this score added. Set in the score file." |
| 138 :group 'gnus-score-default | 138 :group 'gnus-score-default |
| 139 :type 'integer) | 139 :type '(choice (const nil) |
| 140 integer)) | |
| 140 | 141 |
| 141 (defcustom gnus-decay-scores nil | 142 (defcustom gnus-decay-scores nil |
| 142 "*If non-nil, decay non-permanent scores." | 143 "*If non-nil, decay non-permanent scores." |
| 143 :group 'gnus-score-decay | 144 :group 'gnus-score-decay |
| 144 :type 'boolean) | 145 :type 'boolean) |
| 305 (const :tag "message-id" i) | 306 (const :tag "message-id" i) |
| 306 (const :tag "references" t) | 307 (const :tag "references" t) |
| 307 (const :tag "xref" x) | 308 (const :tag "xref" x) |
| 308 (const :tag "lines" l) | 309 (const :tag "lines" l) |
| 309 (const :tag "date" d) | 310 (const :tag "date" d) |
| 310 (const :tag "followup" f))) | 311 (const :tag "followup" f) |
| 312 (const :tag "ask" nil))) | |
| 311 | 313 |
| 312 (defcustom gnus-score-default-type nil | 314 (defcustom gnus-score-default-type nil |
| 313 "Default match type when entering new scores. | 315 "Default match type when entering new scores. |
| 314 | 316 |
| 315 Should be one of the following symbols. | 317 Should be one of the following symbols. |
| 334 (const :tag "before date" b) | 336 (const :tag "before date" b) |
| 335 (const :tag "at date" a) | 337 (const :tag "at date" a) |
| 336 (const :tag "this date" n) | 338 (const :tag "this date" n) |
| 337 (const :tag "less than number" <) | 339 (const :tag "less than number" <) |
| 338 (const :tag "greater than number" >) | 340 (const :tag "greater than number" >) |
| 339 (const :tag "equal than number" =))) | 341 (const :tag "equal than number" =) |
| 342 (const :tag "ask" nil))) | |
| 340 | 343 |
| 341 (defcustom gnus-score-default-fold nil | 344 (defcustom gnus-score-default-fold nil |
| 342 "Use case folding for new score file entries iff not nil." | 345 "Use case folding for new score file entries iff not nil." |
| 343 :group 'gnus-score-default | 346 :group 'gnus-score-default |
| 344 :type 'boolean) | 347 :type 'boolean) |