# HG changeset patch # User Chong Yidong # Date 1243207593 0 # Node ID b05973aa4a3feec5655d490db025cfa65fd57b9d # Parent 7c73e4f57ecfd0dc6b74e87db8dcecede69fe8de * textmodes/ispell.el (ispell-check-version): Handle dashes in version numbers. Suggested by sdl.web@gmail.com (Bug#3369). diff -r 7c73e4f57ecf -r b05973aa4a3f lisp/ChangeLog --- a/lisp/ChangeLog Sun May 24 20:09:51 2009 +0000 +++ b/lisp/ChangeLog Sun May 24 23:26:33 2009 +0000 @@ -1,3 +1,8 @@ +2009-05-24 Chong Yidong + + * textmodes/ispell.el (ispell-check-version): Handle dashes in + version numbers. Suggested by sdl.web@gmail.com (Bug#3369). + 2009-05-23 Chong Yidong * info.el (Info-mode): Doc fix (Bug#3358). diff -r 7c73e4f57ecf -r b05973aa4a3f lisp/textmodes/ispell.el --- a/lisp/textmodes/ispell.el Sun May 24 20:09:51 2009 +0000 +++ b/lisp/textmodes/ispell.el Sun May 24 23:26:33 2009 +0000 @@ -812,11 +812,11 @@ (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")