diff lisp/textmodes/flyspell.el @ 95898:22320e063151

(mail-mode-flyspell-verify): Check message-signature-separator exists before using it.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 13 Jun 2008 15:15:32 +0000
parents f4a69fedbd46
children 5c765f31d8e0
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el	Fri Jun 13 14:52:13 2008 +0000
+++ b/lisp/textmodes/flyspell.el	Fri Jun 13 15:15:32 2008 +0000
@@ -306,11 +306,13 @@
 			       "$")
 		       nil t)
 		      (point)))
-	(signature-begin (save-excursion
-			   (goto-char (point-max))
-			   (re-search-backward message-signature-separator
-					       nil t)
-			   (point))))
+	(signature-begin
+         (if (not (boundp 'message-signature-separator))
+             (point-max)
+           (save-excursion
+             (goto-char (point-max))
+             (re-search-backward message-signature-separator nil t)
+             (point)))))
     (cond ((< (point) header-end)
 	   (and (save-excursion (beginning-of-line)
 				(looking-at "^Subject:"))