# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1229975736 0
# Node ID 413e7b650cf725231f3a59c4179878d77f2a3b59
# Parent  40652147be0cb443271d4dbbdab3430b2800bae2
(pmail-output): Use pmail-buffers-swapped-p as function.

diff -r 40652147be0c -r 413e7b650cf7 lisp/mail/pmailout.el
--- a/lisp/mail/pmailout.el	Mon Dec 22 19:54:59 2008 +0000
+++ b/lisp/mail/pmailout.el	Mon Dec 22 19:55:36 2008 +0000
@@ -466,7 +466,7 @@
 	(or from-gnus
 	    (save-excursion
 	      (save-restriction
-		(goto-char (if pmail-buffers-swapped-p
+		(goto-char (if (pmail-buffers-swapped-p)
 			       (point-min)
 			     (pmail-msgbeg pmail-current-message)))
 		(setq header-beginning (point))