• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/gnus/

Lines Matching +defs:message +defs:sort +defs:headers

64 (defcustom gnus-no-groups-message "No gnus is bad news"
125 (defcustom gnus-group-sort-function 'gnus-group-sort-by-alphabet
129 `gnus-group-sort-by-alphabet', `gnus-group-sort-by-real-name',
130 `gnus-group-sort-by-unread', `gnus-group-sort-by-level',
131 `gnus-group-sort-by-score', `gnus-group-sort-by-method',
132 `gnus-group-sort-by-server', and `gnus-group-sort-by-rank'.
135 the most significant sort function should be the last function in the
144 (choice (function-item gnus-group-sort-by-alphabet)
145 (function-item gnus-group-sort-by-real-name)
146 (function-item gnus-group-sort-by-unread)
147 (function-item gnus-group-sort-by-level)
148 (function-item gnus-group-sort-by-score)
149 (function-item gnus-group-sort-by-method)
150 (function-item gnus-group-sort-by-server)
151 (function-item gnus-group-sort-by-rank)
459 (defvar gnus-group-sort-alist-function 'gnus-group-sort-flat
462 (defvar gnus-group-sort-selected-function 'gnus-group-sort-selected-flat
611 "\C-c\C-s" gnus-group-sort-groups
661 (gnus-define-keys (gnus-group-sort-map "S" gnus-group-group-map)
662 "s" gnus-group-sort-groups
663 "a" gnus-group-sort-groups-by-alphabet
664 "u" gnus-group-sort-groups-by-unread
665 "l" gnus-group-sort-groups-by-level
666 "v" gnus-group-sort-groups-by-score
667 "r" gnus-group-sort-groups-by-rank
668 "m" gnus-group-sort-groups-by-method
669 "n" gnus-group-sort-groups-by-real-name)
671 (gnus-define-keys (gnus-group-sort-selected-map "P" gnus-group-group-map)
672 "s" gnus-group-sort-selected-groups
673 "a" gnus-group-sort-selected-groups-by-alphabet
674 "u" gnus-group-sort-selected-groups-by-unread
675 "l" gnus-group-sort-selected-groups-by-level
676 "v" gnus-group-sort-selected-groups-by-score
677 "r" gnus-group-sort-selected-groups-by-rank
678 "m" gnus-group-sort-selected-groups-by-method
679 "n" gnus-group-sort-selected-groups-by-real-name)
809 ["Fetch control message" gnus-group-fetch-control
812 '(:help "Display the archived control message for the current group"))]
857 ["Default sort" gnus-group-sort-groups t]
858 ["Sort by method" gnus-group-sort-groups-by-method t]
859 ["Sort by rank" gnus-group-sort-groups-by-rank t]
860 ["Sort by score" gnus-group-sort-groups-by-score t]
861 ["Sort by level" gnus-group-sort-groups-by-level t]
862 ["Sort by unread" gnus-group-sort-groups-by-unread t]
863 ["Sort by name" gnus-group-sort-groups-by-alphabet t]
864 ["Sort by real name" gnus-group-sort-groups-by-real-name t])
866 ["Default sort" gnus-group-sort-selected-groups
868 ["Sort by method" gnus-group-sort-selected-groups-by-method
870 ["Sort by rank" gnus-group-sort-selected-groups-by-rank
872 ["Sort by score" gnus-group-sort-selected-groups-by-score
874 ["Sort by level" gnus-group-sort-selected-groups-by-level
876 ["Sort by unread" gnus-group-sort-selected-groups-by-unread
878 ["Sort by name" gnus-group-sort-selected-groups-by-alphabet
880 ["Sort by real name" gnus-group-sort-selected-groups-by-real-name
951 ["Send a message (mail or news)" gnus-group-post-news t]
952 ["Create a local message" gnus-group-news t]
1256 (gnus-message 5 gnus-no-groups-message))
1372 (setq gnus-zombie-list (sort gnus-zombie-list 'string<))
1383 (setq gnus-killed-list (sort gnus-killed-list 'string<)))
2128 (defcustom gnus-fetch-old-ephemeral-headers nil
2129 "Same as `gnus-fetch-old-headers', but only used for ephemeral newsgroups."
2187 (error "Unable to contact server: %s" (gnus-status-message method)))
2197 (gnus-fetch-old-headers
2198 gnus-fetch-old-ephemeral-headers))
2203 (message "Quit reading the ephemeral group")
2305 (gnus-message 7 "No more%s newsgroups%s" (if all "" " unread")
2470 (gnus-message 6 "Deleting group %s..." group-decoded)
2473 (gnus-message 6 "Deleting group %s...done" group-decoded)
2514 (gnus-message 6 "Renaming group %s to %s..." group new-name)
2528 (gnus-message 6 "Renaming group %s to %s...done" group new-name)
2639 - if anything else, just print a message."
2650 (gnus-message 1 "Documentation group already exists")))
2653 (gnus-message 1 "Couldn't find doc group")
2673 (message
2710 (message-unique-id)))
2860 (let ((headers (mapcar (lambda (group) (list group))
2861 '("subject" "from" "number" "date" "message-id"
2866 "Match on header: " headers nil t))))
2994 (defun gnus-group-sort-groups (func &optional reverse)
2997 determined by the `gnus-group-sort-function' variable.
2999 (interactive (list gnus-group-sort-function current-prefix-arg))
3000 (funcall gnus-group-sort-alist-function
3001 (gnus-make-sort-function func) reverse)
3006 (defun gnus-group-sort-flat (func reverse)
3013 (sort gnus-newsrc-alist func))
3019 (defun gnus-group-sort-groups-by-alphabet (&optional reverse)
3021 If REVERSE, sort in reverse order."
3023 (gnus-group-sort-groups 'gnus-group-sort-by-alphabet reverse))
3025 (defun gnus-group-sort-groups-by-real-name (&optional reverse)
3027 If REVERSE, sort in reverse order."
3029 (gnus-group-sort-groups 'gnus-group-sort-by-real-name reverse))
3031 (defun gnus-group-sort-groups-by-unread (&optional reverse)
3033 If REVERSE, sort in reverse order."
3035 (gnus-group-sort-groups 'gnus-group-sort-by-unread reverse))
3037 (defun gnus-group-sort-groups-by-level (&optional reverse)
3039 If REVERSE, sort in reverse order."
3041 (gnus-group-sort-groups 'gnus-group-sort-by-level reverse))
3043 (defun gnus-group-sort-groups-by-score (&optional reverse)
3045 If REVERSE, sort in reverse order."
3047 (gnus-group-sort-groups 'gnus-group-sort-by-score reverse))
3049 (defun gnus-group-sort-groups-by-rank (&optional reverse)
3051 If REVERSE, sort in reverse order."
3053 (gnus-group-sort-groups 'gnus-group-sort-by-rank reverse))
3055 (defun gnus-group-sort-groups-by-method (&optional reverse)
3057 If REVERSE, sort in reverse order."
3059 (gnus-group-sort-groups 'gnus-group-sort-by-method reverse))
3061 (defun gnus-group-sort-groups-by-server (&optional reverse)
3063 If REVERSE, sort in reverse order."
3065 (gnus-group-sort-groups 'gnus-group-sort-by-server reverse))
3069 (defun gnus-group-sort-selected-groups (n func &optional reverse)
3071 (interactive (list current-prefix-arg gnus-group-sort-function))
3073 (funcall gnus-group-sort-selected-function
3074 groups (gnus-make-sort-function func) reverse)
3079 (defun gnus-group-sort-selected-flat (groups func reverse)
3085 ;; Then sort the infos.
3087 (sort
3102 (defun gnus-group-sort-selected-groups-by-alphabet (&optional n reverse)
3105 sort in reverse order."
3107 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-alphabet reverse))
3109 (defun gnus-group-sort-selected-groups-by-real-name (&optional n reverse)
3112 sort in reverse order."
3114 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-real-name reverse))
3116 (defun gnus-group-sort-selected-groups-by-unread (&optional n reverse)
3119 sort in reverse order."
3121 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-unread reverse))
3123 (defun gnus-group-sort-selected-groups-by-level (&optional n reverse)
3126 sort in reverse order."
3128 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-level reverse))
3130 (defun gnus-group-sort-selected-groups-by-score (&optional n reverse)
3133 sort in reverse order."
3135 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-score reverse))
3137 (defun gnus-group-sort-selected-groups-by-rank (&optional n reverse)
3140 sort in reverse order."
3142 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-rank reverse))
3144 (defun gnus-group-sort-selected-groups-by-method (&optional n reverse)
3147 sort in reverse order."
3149 (gnus-group-sort-selected-groups n 'gnus-group-sort-by-method reverse))
3153 (defun gnus-group-sort-by-alphabet (info1 info2)
3157 (defun gnus-group-sort-by-real-name (info1 info2)
3162 (defun gnus-group-sort-by-unread (info1 info2)
3169 (defun gnus-group-sort-by-level (info1 info2)
3173 (defun gnus-group-sort-by-method (info1 info2)
3180 (defun gnus-group-sort-by-server (info1 info2)
3189 (defun gnus-group-sort-by-score (info1 info2)
3193 (defun gnus-group-sort-by-rank (info1 info2)
3286 (gnus-message 2 "Dead groups can't be caught up")
3314 (gnus-message 1 "Can't catch up %s; non-active group" group)
3353 (gnus-message 6 "Expiring articles in %s..."
3379 (gnus-message 6 "Expiring articles in %s...done"
3388 (gnus-message 5 "Expiring...")
3393 (gnus-message 5 "Expiring...done"))
3418 (gnus-message 6 "Changed level of %s from %d to %d"
3569 (message "Killed group %s" (gnus-group-decoded-name group)))
3673 (gnus-message 6 "No killed groups")
3684 (gnus-message 6 "No zombie groups")
3699 ;; Find all groups and sort them.
3701 (sort
3812 (gnus-error 3 "%s error: %s" group (gnus-status-message group)))))
3843 (gnus-message 1 "No such file: %s" file)
3919 (gnus-message 1
3975 (gnus-message 3 "No groups matched \"%s\"." regexp)
3981 (setq groups (sort groups 'string<))
4053 (gnus-message 5 "Read %s" gnus-init-file))
4080 (gnus-message
4112 (eq major-mode 'message-mode))))
4125 (gnus-message 7 "Cleared dribble buffer"))
4178 (gnus-message 7 (substitute-command-keys "\\<gnus-group-mode-map>\\[gnus-group-read-group]:Select \\[gnus-group-next-unread-group]:Forward \\[gnus-group-prev-unread-group]:Backward \\[gnus-group-exit]:Exit \\[gnus-info-find-node]:Run Info \\[gnus-group-describe-briefly]:This help")))
4244 (gnus-message 6 "Note: New group created")
4290 (sort (nconc (gnus-uncompress-range (cdr m))