From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.user/9624
Path: news.gmane.org!not-for-mail
From: Richard G Riley <rileyrgdev@googlemail.com>
Newsgroups: gmane.emacs.gnus.user
Subject: Prompt to confirm post.
Date: Fri, 07 Sep 2007 12:46:44 +0200
Message-ID: <7py7fiiwh7.fsf@homelinux.net>
NNTP-Posting-Host: lo.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: sea.gmane.org 1189165224 1226 80.91.229.12 (7 Sep 2007 11:40:24 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Fri, 7 Sep 2007 11:40:24 +0000 (UTC)
To: info-gnus-english@gnu.org
Original-X-From: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org Fri Sep 07 13:40:24 2007
Return-path: <info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org>
Envelope-to: gegu-info-gnus-english@m.gmane.org
Original-Received: from lists.gnu.org ([199.232.76.165])
	by lo.gmane.org with esmtp (Exim 4.50)
	id 1ITcC8-0001Zg-QD
	for gegu-info-gnus-english@m.gmane.org; Fri, 07 Sep 2007 13:40:16 +0200
Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.43)
	id 1ITcC6-000211-KR
	for gegu-info-gnus-english@m.gmane.org; Fri, 07 Sep 2007 07:40:14 -0400
Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!news.tele.dk!news.tele.dk!small.news.tele.dk!fu-berlin.de!uni-berlin.de!individual.net!not-for-mail
Original-Newsgroups: gnu.emacs.gnus
Original-Lines: 27
Original-X-Trace: individual.net bCoH9ElNBXIuAqlWSs4KcQa9dpi4AKG1ueooGnKDrl+FQYR+Jl
X-Orig-Path: news.individual.net!news
Cancel-Lock: sha1:/+PxxMOh9UYO6NBtjLqEQJXBLj8=
	sha1:mC7wFdaZKuXrL409GZB6Eyy/3Ak=
User-Agent: Gnus/5.110007 (No Gnus v0.7) Emacs/22.1.50.6 (gnu/linux)
Original-Xref: shelby.stanford.edu gnu.emacs.gnus:79826
X-BeenThere: info-gnus-english@gnu.org
X-Mailman-Version: 2.1.5
Precedence: list
List-Id: "Announcements and discussions for GNUS,
	the GNU Emacs Usenet newsreader \(in English\)"
	<info-gnus-english.gnu.org>
List-Unsubscribe: <http://lists.gnu.org/mailman/listinfo/info-gnus-english>,
	<mailto:info-gnus-english-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/pipermail/info-gnus-english>
List-Post: <mailto:info-gnus-english@gnu.org>
List-Help: <mailto:info-gnus-english-request@gnu.org?subject=help>
List-Subscribe: <http://lists.gnu.org/mailman/listinfo/info-gnus-english>,
	<mailto:info-gnus-english-request@gnu.org?subject=subscribe>
Original-Sender: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org
Errors-To: info-gnus-english-bounces+gegu-info-gnus-english=m.gmane.org@gnu.org
Xref: news.gmane.org gmane.emacs.gnus.user:9624
Archived-At: <http://permalink.gmane.org/gmane.emacs.gnus.user/9624>


Hi,

I found this function using google to prompt for posting confirmation
while displaying all headers:

(defun message-check-news-syntax ()
  "Check the syntax of the message."
  (and
   (save-excursion
     (save-restriction
       (widen)
       (and
	;; We narrow to the headers and check them first.
	(save-excursion
	  (save-restriction
	    (message-narrow-to-headers)
	    (message-check-news-header-syntax)))
	;; Check the body.
	(message-check-news-body-syntax))))
					; sm: this last line is my addition
   (y-or-n-p "Post the message? ")
   ))


Is there now a better way to do this? Maybe something which does the
same for sending mail too?