diff options
author | Eli Zaretskii <[email protected]> | 2005-09-10 15:09:06 +0000 |
---|---|---|
committer | Eli Zaretskii <[email protected]> | 2005-09-10 15:09:06 +0000 |
commit | c10b0abc3891947ffe2b56ed8228e8d1a8b7c583 (patch) | |
tree | 481de04da59c727368ac23a60ec89a493e7ad271 | |
parent | 4ca7c4680d02eec2260a920e834425d86dfd1d3e (diff) |
(ispell-check-version): Signal an error if aspell version is less than 0.60.
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/textmodes/ispell.el | 5 |
2 files changed, 9 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d883cbb223..ba777467eb 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-09-10 Magnus Henoch <[email protected]> + + * textmodes/ispell.el (ispell-check-version): Signal an error if + aspell version is less than 0.60. + 2005-09-10 Pascal Dupuis <[email protected]> (tiny change) * progmodes/octave-inf.el (inferior-octave-startup): Resync diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 8bd8ed2d69..acd27d69c4 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -814,7 +814,10 @@ Otherwise returns the library directory name, if that is defined." (goto-char (point-min)) (let (case-fold-search) (setq ispell-really-aspell - (and (search-forward "(but really Aspell " nil t) t)))) + (and (search-forward-regexp "(but really Aspell \\(.*\\))" nil t) + (if (version< (match-string 1) "0.60") + (error "aspell version 0.60 or greater is required") + t))))) (kill-buffer (current-buffer))) result)) |