* textmodes/ispell.el (ispell-check-version): Handle dashes in

version numbers.  Suggested by sdl.web@gmail.com (Bug#3369).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ac9f1a8..caaef5d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-05-24  Chong Yidong  <cyd@stupidchicken.com>
+
+       * textmodes/ispell.el (ispell-check-version): Handle dashes in
+       version numbers.  Suggested by sdl.web@gmail.com (Bug#3369).
+
 2009-05-23  Chong Yidong  <cyd@stupidchicken.com>
 
        * info.el (Info-mode): Doc fix (Bug#3358).

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 364e3c0..c68d69b 100644 (file)
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -812,11 +812,11 @@ Otherwise returns the library directory name, if that is defined."
        (goto-char (point-min))
        (or (setq ispell-really-aspell
                  (and (search-forward-regexp
-                       "(but really Aspell \\([0-9]+\\.[0-9\\.]+\\)?)" nil t)
+                       "(but really Aspell \\([0-9]+\\.[0-9\\.-]+\\)?)" nil t)
                       (match-string 1)))
            (setq ispell-really-hunspell
                  (and (search-forward-regexp
-                       "(but really Hunspell \\([0-9]+\\.[0-9\\.]+\\)?)" nil t)
+                       "(but really Hunspell \\([0-9]+\\.[0-9\\.-]+\\)?)" nil t)
                       (match-string 1)))))
 
       (let ((aspell-minver    "0.50")