[Top][All Lists]
[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:"))
- report-emacs-bug, flyspell,
David Reitter <=