Lines Matching defs:distribution
956 (defcustom message-distribution-function nil
2342 (define-key message-mode-map "\C-c\C-f\C-d" 'message-goto-distribution)
2481 ["Distribution" message-goto-distribution t]
2763 (defun message-goto-distribution ()
4923 (defun message-make-distribution ()
4925 (let ((orig-distribution (message-fetch-reply-field "distribution")))
4926 (cond ((functionp message-distribution-function)
4927 (funcall message-distribution-function))
4928 (t orig-distribution))))
5196 (Distribution (message-make-distribution))
6108 followup-to distribution newsgroups gnus-warning posted-to)
6128 distribution (message-fetch-field "distribution")
6133 ;; Remove bogus distribution.
6134 (when (and (stringp distribution)
6136 (string-match "world" distribution)))
6137 (setq distribution nil))
6200 ,@(and distribution (list (cons 'Distribution distribution)))
6261 (let (from newsgroups message-id distribution buf)
6269 distribution (message-fetch-field "distribution")))
6283 (if distribution
6284 (concat "Distribution: " distribution "\n")