Lines Matching +defs:set +defs:end
316 `message-subject-trailing-was-query' is set to the symbol `ask'. If
330 If `message-subject-trailing-was-query' is set to t, the subject is
349 (defcustom message-mark-insert-end
350 "--8<---------------cut here---------------end--------------->8---\n"
351 "How to mark the end of some inserted text."
583 (set-syntax-table text-mode-syntax-table)
589 (set-syntax-table old-table)
607 ;; Useful to set in site-init.el
771 For e.g., if you wish to set the envelope sender address so that bounces
773 might set this variable to '(\"-f\" \"you@some.where\")."
863 (set-keymap-parent map minibuffer-local-map)
884 Fix `message-cite-prefix-regexp' if it is set to an abnormal value.
892 Fix `message-cite-prefix-regexp' if it is set to an abnormal value.
931 "*String to be inserted at the end of the message buffer.
941 "*Name of file containing the text inserted at end of message buffer.
1035 (set-buffer buffer)
1348 ;; XEmacs does it like this. For Emacs, we have to set the
1646 (autoload 'gnus-select-frame-set-input-focus "gnus-util"))
1701 (setq beg (match-end 0)))
1732 (set-text-properties 0 (length value) nil value)
1777 (set-buffer message-reply-buffer)
1802 (match-end 1)))
1808 (substring subject (match-end 0))
1839 cs-coding q-or-b word-beg word-end)
1860 word-end (match-end 0))
1880 (re-search-forward "=\\?\\([^?]+\\)\\?\\([QB]\\)\\?" word-end t)
1889 word-end t)
1894 (re-search-forward "[^?]+" word-end t)
1968 (defun message-mark-inserted-region (beg end)
1970 See `message-mark-insert-begin' and `message-mark-insert-end'."
1973 ;; add to the end of the region first, otherwise end would be invalid
1974 (goto-char end)
1975 (insert message-mark-insert-end)
1981 See `message-mark-insert-begin' and `message-mark-insert-end'."
1985 (insert message-mark-insert-end)
1995 body, set `message-archive-note' to nil."
2012 With prefix-argument just set Follow-Up, don't cross-post."
2041 (end-of-line)
2043 (end-of-line) ; ensure Followup: comes after Newsgroups:
2055 "Insert a in message body note about a set Followup or Crosspost.
2086 "Crossposts message and set Followup-To to TARGET-GROUP.
2087 With prefix-argument just set Follow-Up, don't cross-post."
2233 (or (match-end 1) (match-beginning 2))
2301 (1- (match-end 0))))
2331 (set-keymap-parent message-mode-map text-mode-map)
2521 composing in various ways. If this option is set, message will strip
2556 (get-text-property pos 'egg-end)
2560 (defun message-strip-forbidden-properties (begin end &optional old-length)
2568 (while (not (= begin end))
2613 (set (make-local-variable 'message-reply-buffer) nil)
2614 (set (make-local-variable 'message-inserted-headers) nil)
2615 (set (make-local-variable 'message-send-actions) nil)
2616 (set (make-local-variable 'message-exit-actions) nil)
2617 (set (make-local-variable 'message-kill-actions) nil)
2618 (set (make-local-variable 'message-postpone-actions) nil)
2619 (set (make-local-variable 'message-draft-article) nil)
2621 (set (make-local-variable 'facemenu-add-face-function)
2622 (lambda (face end)
2625 (funcall face-fun (point) end)
2628 (set (make-local-variable 'facemenu-remove-face-function) t)
2629 (set (make-local-variable 'message-reply-headers) nil)
2633 (set (make-local-variable 'message-sent-message-via) nil)
2634 (set (make-local-variable 'message-checksum) nil)
2635 (set (make-local-variable 'message-mime-part) 0)
2638 ;; (set (make-local-variable 'comment-start) message-yank-prefix)
2640 (set (make-local-variable 'comment-start) message-yank-prefix)
2641 (set (make-local-variable 'comment-start-skip)
2645 (set (make-local-variable 'font-lock-defaults)
2648 (set (make-local-variable 'tool-bar-map) (message-make-tool-bar))))
2662 (message-set-auto-save-file-name))
2667 (set (make-local-variable 'indent-tabs-mode) nil) ;No tabs for indentation.
2672 (set (make-local-variable 'fill-paragraph-function)
2682 ;; message-yank-prefix is set to an abnormal value.
2709 ;; `text-mode-hook' ourself at the end of the mode.
2804 "Move point to the end of the headers."
2811 If there is no signature in the article, go to the end and
2919 (set-buffer message-reply-buffer)
2944 (defun message-delete-not-region (beg end)
2954 (goto-char end)
2975 (end-of-line -1))
2984 (let (quoted point beg end leading-space bolp)
2998 (goto-char (match-end 0))
3007 end nil))
3015 (goto-char (match-end 0))
3020 (setq end (point))
3027 (goto-char (match-end 0))
3035 (setq end (point))
3043 (narrow-to-region beg end)
3076 ;; Is it better to use `mail-header-end'?
3262 (search-forward mail-header-separator nil 'end))
3316 ;; Delete blank lines at the end of the buffer.
3377 (set-buffer buffer)
3386 (end (mark t))
3397 (narrow-to-region start end)
3406 (mml-quote-region start end)
3409 (goto-char end)
3416 (delete-region (point) end)
3435 (end (mark t))
3446 (narrow-to-region start end)
3455 (mml-quote-region start end)
3513 (setq mark (set-marker (make-marker) (point)))
3519 (set-marker mark nil)))))
3547 (set-buffer-modified-p t)
3613 (message-options-set-recipient)
3650 (set-buffer-modified-p nil)
3689 ;; Make sure there's a newline at the end of the message.
3776 (set (setq var (intern (format "message-%s-actions" (pop types))))
3821 (set-buffer curbuf)
3823 (set-buffer tembuf)
3853 (end-of-line)
3906 (set-buffer tembuf)
3924 ;; require one newline at the end.
3973 If you always want Gnus to send messages in one piece, set
3982 (set-buffer mailbuf)
4013 (set-buffer errbuf)
4052 (set-buffer errbuf)
4216 (set-buffer tembuf)
4236 ;; require one newline at the end.
4252 (set-buffer messbuf)
4338 (match-beginning 0) (- (match-end 0) 2))))
4351 (1- (match-end 0)))))
4376 "Message-ID.*.i-did-not-set--mail-host-address--so-tickle-me" nil t)
4393 ;; Does the ID end with a dot?
4583 (end-of-line)
4683 (set-buffer (get-buffer-create " *message temp*"))
4973 (aset tmp (1- (match-end 0)) ?-))
5072 ".i-did-not-set--mail-host-address--so-tickle-me")))))
5078 (substring fqdn 0 (1- (match-end 0)))))
5110 (let (begin end item re)
5117 (setq end (point))
5118 (if (bolp) (setq end (1- end)))
5119 (setq item (regexp-quote (buffer-substring begin end)))
5305 (point) (match-end 0)
5517 (set zrs t)))
5594 (gnus-select-frame-set-input-focus (window-frame window))
5597 (set-buffer buffer))
5605 (set-buffer name))
5769 (set-buffer-modified-p nil)
5781 (defun message-set-auto-save-file-name ()
6000 (setq recipients (substring recipients (match-end 0))))
6277 (setq buf (set-buffer (get-buffer-create " *message cancel*"))))
6362 ;; and off the end
6599 (set-buffer forward-buffer)
6626 ;; We first set up a normal mail buffer.
6628 (set-buffer (get-buffer-create " *message resend*"))
6706 (delete-region (match-beginning 0) (match-end 0)))))
6782 (defun bold-region (start end)
6790 (move-marker end1 (max start end))
6791 (goto-char (min start end))
6798 (defun unbold-region (start end)
6805 (move-marker end1 (max start end))
6806 (goto-char (min start end))
6830 ;; Note: The :set function in the `message-tool-bar*' variables will only
6838 ;; When used as ":set" function:
6839 (set-default symbol value)))
6859 :set 'message-tool-bar-update
6888 :set 'message-tool-bar-update
6908 :set 'message-tool-bar-update
6921 :set 'message-tool-bar-update
7061 (set-buffer " *MESSAGE information message*")
7085 (set-buffer (generate-new-buffer name))
7092 (set-buffer buffer)
7103 (set (make-local-variable (car local))
7194 (defun message-options-set (symbol value)
7204 (defun message-options-set-recipient ()
7207 (message-options-set 'message-sender
7210 (message-options-set 'message-recipients