Lines Matching +defs:article +defs:window
132 article in. The default function is `message-output' which saves in Unix
145 "The following message is a courtesy copy of an article\nthat has been posted to %s as well.\n\n"
148 the article has been posted to will be inserted there.
226 "*Headers to be generated or prompted for when posting an article.
358 "Header to insert when you don't want your article to be archived.
502 * `message-forward-subject-author-subject' Source of article (author or
504 * `message-forward-subject-name-subject' Source of article (name of author
506 * `message-forward-subject-fwd' Subject of article with 'Fwd:' prepended
601 (defcustom message-cancel-message "I am canceling my own article.\n"
807 ;; is nil. See: http://article.gmane.org/gmane.emacs.gnus.general/51138
964 "Number of days before your article expires."
982 "The headers of the current replied article.
1118 `empty-article' Allow you to post an empty article;
1413 article matching this variable is used as the From field of
1502 (defvar message-draft-article nil)
1643 (autoload 'gnus-delay-article "gnus-delay")
1969 "Mark some region in the current article with enclosing tags.
2388 (define-key message-mode-map "\C-c\n" 'gnus-delay-article)
2440 ["Send at Specific Time..." gnus-delay-article
2619 (set (make-local-variable 'message-draft-article) nil)
2811 If there is no signature in the article, go to the end and
2847 "Insert a To header that points to the author of the article being replied to.
2863 (error "No mail address in the article"))
2931 "Insert the Newsgroups header from the article being replied to."
3369 (save-window-excursion
3393 ;; may insert a different article from the original. So, we will
3394 ;; modify the value of `message-reply-headers' with that article.
3442 ;; may insert a different article from the original. So, we will
3443 ;; modify the value of `message-reply-headers' with that article.
3559 (draft-article message-draft-article)
3570 ;; If the message buffer has lived in a dedicated window,
3580 (let ((message-draft-article draft-article))
3588 (if (and (window-dedicated-p (selected-window))
4108 (let ((mh-previous-window-config nil)
4349 (format "The article contains a %s command. Really post? "
4382 (y-or-n-p "The article contains an Approved header. Really post? ")
4590 ;; Check whether the article is empty.
4601 (if (message-gnksa-enable-p 'empty-article)
4602 (y-or-n-p "Empty article. Really post? ")
4603 (message "Denied posting -- Empty article.")
4611 "The article contains control characters. Really post? ")
4617 (format "The article is %d octets long. Really post? "
4706 ;; Pipe the article to the program in question.
4710 ;; Save the article.
4724 "Append this article to Unix/babyl mail file FILENAME."
5181 "Prepare article HEADERS.
5590 (let ((window (get-buffer-window buffer 0)))
5591 (if window
5594 (gnus-select-frame-set-input-focus (window-frame window))
5595 (select-window window))
5788 (setq message-draft-article
5804 (when message-draft-article
5806 (list message-draft-article) "drafts" nil t)))
5809 "Generate the headers for the article."
5866 "Start editing a news article to be sent."
5919 article, it has the value of
6039 "Start editing a reply to the article in the current buffer."
6212 "Non-nil means current article is yours.
6220 ;; IF article has cancel-lock THEN
6224 ;; error: cancellock: article is not yours
6233 (error "Failed to verify Cancel-lock: This article is not yours"))
6256 "Cancel an article you posted.
6260 (error "This is not a news article; canceling is impossible"))
6263 ;; Get header info from original article.
6270 ;; Make sure that this article was written by the user.
6272 (error "This article is not yours"))
6273 (when (yes-or-no-p "Do you really want to cancel this article? ")
6290 (message "Canceling your article...")
6294 (message "Canceling your article...done"))
6300 This is done simply by taking the old article and adding a Supersedes
6304 ;; Check whether the user owns the article that is to be superseded.
6306 (error "This article is not yours"))
6317 (error "No Message-ID in this article")
6329 (cond ((save-window-excursion
6453 (defvar gnus-article-decoded-p))
6464 (if (local-variable-p 'gnus-article-decoded-p (current-buffer))
6465 gnus-article-decoded-p ;; In an article buffer.
6598 (save-window-excursion
6619 "Resend the current article to ADDRESS."
6720 (defun message-mail-other-window (&optional to subject)
6721 "Like `message-mail' command, but display mail buffer in another window."
6727 (same-window-buffer-names nil)
6728 (same-window-regexps nil))
6732 nil nil nil 'switch-to-buffer-other-window)))
6742 (same-window-buffer-names nil)
6743 (same-window-regexps nil))
6750 (defun message-news-other-window (&optional newsgroups subject)
6751 "Start editing a news article to be sent."
6756 (same-window-buffer-names nil)
6757 (same-window-regexps nil))
6765 "Start editing a news article to be sent."
6770 (same-window-buffer-names nil)
6771 (same-window-regexps nil))
7033 (save-selected-window
7058 (save-window-excursion
7172 From headers in the original article."