bug-gnu-emacs
[Top][All Lists]
Advanced

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

ispell 3.4 nested ignore blocks


From: Michael Ernst
Subject: ispell 3.4 nested ignore blocks
Date: Mon, 25 Mar 2002 17:30:02 -0500

ispell.el 3.4 is distributed with Emacs 21.2.

When there are nested begin-end blocks that ispell ignores,
`ispell-message' can throw an error.  This patch corrects the problem.
This does not appear to be necessary in ispell.el 3.5, so it would be even
better if you simply distributed that version with Emacs 21.3 instead.


2002-03-25  Michael Ernst  <address@hidden>

        * textmodes/ispell.el (ispell-get-line): Don't err if end is
        before point.

*** /usr/local/share/emacs/21.2/lisp/textmodes/ispell.el        Mon Jan 28 
11:33:01 2002
--- -   Mon Mar 25 16:32:17 2002
***************
*** 2596,2601 ****
       ;;((looking-at "address@hidden") ; SKIP SPECIAL ISPELL CHARACTERS
       ;; (forward-char 1))             ; not needed as quoted below.
!      ((or (re-search-forward ispell-casechars end t) ; TEXT EXISTS
!         (re-search-forward "[][()${}]" end t)) ; or MATH COMMANDS
        (setq string (concat "^" (buffer-substring-no-properties start end)
                           "\n"))
--- 2596,2602 ----
       ;;((looking-at "address@hidden") ; SKIP SPECIAL ISPELL CHARACTERS
       ;; (forward-char 1))             ; not needed as quoted below.
!      ((and (< (point) end)
!            (or (re-search-forward ispell-casechars end t) ; TEXT EXISTS
!                (re-search-forward "[][()${}]" end t))) ; or MATH COMMANDS
        (setq string (concat "^" (buffer-substring-no-properties start end)
                           "\n"))



reply via email to

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