aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorEli Zaretskii <[email protected]>2005-09-10 15:09:06 +0000
committerEli Zaretskii <[email protected]>2005-09-10 15:09:06 +0000
commitc10b0abc3891947ffe2b56ed8228e8d1a8b7c583 (patch)
tree481de04da59c727368ac23a60ec89a493e7ad271
parent4ca7c4680d02eec2260a920e834425d86dfd1d3e (diff)
(ispell-check-version): Signal an error if aspell version is less than 0.60.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/textmodes/ispell.el5
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))