emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

report-emacs-bug, flyspell


From: David Reitter
Subject: report-emacs-bug, flyspell
Date: Thu, 12 Jun 2008 08:48:05 +0100

When enabling flyspell in a buffer created by M-x report-emacs-bug, or when flyspell is generally enabled for all text modes with (add-hook 'text-mode-hook 'flyspell-mode), an error from within post-command- hook is thrown: `message-signature-separator' is void.

The reason for that is that `mail-mode-flyspell-verify' wrongly assumes that `message-signature-separator' is defined. `report-emacs- bug' enables mail mode, but does not load `message'.

A simple fix follows.




*** lisp/textmodes/flyspell.el  06 Apr 2008 12:51:35 +0100      1.118.2.6
--- lisp/textmodes/flyspell.el  12 Jun 2008 08:45:05 +0100      
***************
*** 296,306 ****
                               "$")
                       nil t)
                      (point)))
!       (signature-begin (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:"))
--- 296,309 ----
                               "$")
                       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:"))





reply via email to

[Prev in Thread] Current Thread [Next in Thread]