aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancesco Potortì1994-09-22 11:41:17 +0000
committerFrancesco Potortì1994-09-22 11:41:17 +0000
commit130f43af3de2c8673940008b272dc7c128591903 (patch)
treeab482eab9991ce6c2cbe9e3df700c53a9de9256f
parent6b3faad82b11e79694f2f1675c68c9d2ce111919 (diff)
downloademacs-130f43af3de2c8673940008b272dc7c128591903.tar.gz
emacs-130f43af3de2c8673940008b272dc7c128591903.zip
* ispell.el (check-ispell-version): suggest to try ispell4.el if
version does not match.
-rw-r--r--lisp/textmodes/ispell.el13
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index c1bf5e52709..6955d98968c 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -1399,13 +1399,14 @@ scrolling the current window. Leave the new window selected."
1399 "\\|") 1399 "\\|")
1400 "\\)\\b") 1400 "\\)\\b")
1401 nil t)) 1401 nil t))
1402 (error "version mismatch: ispell.el is for %s, %s is %s" 1402 (error "%s version %s is required: try renaming ispell4.el to ispell.el"
1403 (car ispell-required-versions)
1404 ispell-program-name 1403 ispell-program-name
1405 (if (re-search-forward "version \\([0-9][0-9.]+\\)\\b" 1404 (car ispell-required-versions)
1406 nil t) 1405 ;(if (re-search-forward "version \\([0-9][0-9.]+\\)\\b"
1407 (buffer-substring (match-beginning 1) (match-end 1)) 1406 ; nil t)
1408 "an unknown version")))) 1407 ; (buffer-substring (match-beginning 1) (match-end 1))
1408 ; "an unknown version")
1409 )))
1409 (kill-buffer (current-buffer))))) 1410 (kill-buffer (current-buffer)))))
1410 1411
1411 1412