Lines Matching defs:score
33 (require 'gnus-score)
164 (score-file (file :tag "Score File") "\
165 Make the specified file into the current score file.
166 This means that all score commands you issue will end up in this file.")
170 All adaptive score entries will be put into this file.")
276 (agent-score
278 (const file :tag "Use group's score files")
280 "Which score files to use when using score to select articles to fetch.
286 The group's score files will be used to score the articles.
289 A list of score file names."
290 gnus-agent-cat-score-file)
299 (agent-low-score
302 lower than this limit." gnus-agent-cat-low-score)
303 (agent-high-score
306 higher than this limit." gnus-agent-cat-high-score)
504 (defconst gnus-score-parameters
507 Any articles with a score lower than this number will be marked as read.")
511 Any articles with a score lower than this number will be removed from
516 Any articles with a score lower than this number will be marked as
521 All articles that belong to a thread that has a total score below this
523 `gnus-thread-score-function' says how to compute the total score
528 These files are assumed to be score files as well, and will be loaded
538 This element will be ignored when handling global score files.")
541 Read-only score files will not be updated or saved.
542 Global score files should feature this atom.")
551 You can do this with the following two score file entries:
557 threads. You then raise the score of the threads that you find
562 I.e.---the orphan score atom is for high-volume groups where there
581 `(adapt t)' in the score files of the groups where you want it.")
584 All adaptive score entries will go to the file named by this entry.
599 "Alist of valid symbolic score parameters.
605 (define-widget 'gnus-score-string 'group
606 "Edit score entries for string-valued headers."
607 :convert-widget 'gnus-score-string-convert)
609 (defun gnus-score-string-convert (widget)
614 (score '(choice :tag "Score"
636 (group `(group ,match ,score ,expire ,type))
638 (concat "Change score based on the " tag
641 You can have an arbitrary number of score entries for this header,
642 each score entry has four elements:
647 2. The \"score element\". This number should be an integer in the
648 neginf to posinf interval. This number is added to the score
650 not present, the `gnus-score-interactive-default-score' number
653 3. The \"date element\". This date says when the last time this score
655 score entries. It this element is not present, the score
660 be used to see whether this score entry matches the article.
678 (define-widget 'gnus-score-integer 'group
679 "Edit score entries for integer-valued headers."
680 :convert-widget 'gnus-score-integer-convert)
682 (defun gnus-score-integer-convert (widget)
687 (score '(choice :tag "Score"
702 (group `(group ,match ,score ,expire ,type))
704 (concat "Change score based on the " tag
715 (define-widget 'gnus-score-date 'group
716 "Edit score entries for date-valued headers."
717 :convert-widget 'gnus-score-date-convert)
719 (defun gnus-score-date-convert (widget)
724 (score '(choice :tag "Score"
738 (group `(group ,match ,score ,expire ,type))
740 (concat "Change score based on the " tag
770 (defvar gnus-custom-score-alist)
772 (defun gnus-score-customize (file)
773 "Customize score file FILE.
774 When called interactively, FILE defaults to the current score file.
775 This can be changed using the `\\[gnus-score-change-score-file]' command."
776 (interactive (list gnus-current-score-file))
778 (error "No score file for %s"
780 (let ((scores (gnus-score-load file))
786 gnus-score-parameters)))
791 (make-local-variable 'gnus-custom-score-alist)
792 (setq gnus-custom-score-alist scores)
796 :tag "score entries"
804 :action 'gnus-score-customize-done)
806 Check the [ ] for the entries you want to apply to this score file, then
821 (gnus-score-string :tag "From")
822 (gnus-score-string :tag "Subject")
823 (gnus-score-string :tag "References")
824 (gnus-score-string :tag "Xref")
825 (gnus-score-string :tag "Extra")
826 (gnus-score-string :tag "Message-ID")
827 (gnus-score-integer :tag "Lines")
828 (gnus-score-integer :tag "Chars")
829 (gnus-score-date :tag "Date")
830 (gnus-score-string :tag "Head"
836 (gnus-score-string :tag "Body"
842 (gnus-score-string :tag "All"
849 (gnus-score-string :tag
855 header, and affect the score of not only the matching articles, but
857 e.g. increase the score of followups to your own articles, or decrease
858 the score of followups to the articles of some known trouble-maker.
860 (gnus-score-string :tag "Thread"
862 Add a score entry on all articles that are part of a thread.
865 If you say that you want to score on a (sub-)thread that is started by
870 can raise/lower the score of an entire thread, even though some
882 (defun gnus-score-customize-done (&rest ignore)
883 "Reset the score alist with the present value."
884 (let ((alist gnus-custom-score-alist)
888 (gnus-score-set 'touched '(t) alist))
894 (defvar gnus-agent-cat-score-file)
897 (defvar gnus-agent-cat-low-score)
898 (defvar gnus-agent-cat-high-score)
966 (cons 'agent-low-score gnus-agent-low-score)
967 (cons 'agent-high-score gnus-agent-high-score))))
1010 (gnus-agent-cat-prepare-category-field agent-score)
1013 (gnus-agent-cat-prepare-category-field agent-low-score)
1014 (gnus-agent-cat-prepare-category-field agent-high-score)