From 27ce741e2b6f27e98538cceb5453ce9f4f6ac465 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sat, 2 Dec 2000 20:28:44 +0000 Subject: [PATCH] (check-ispell-version): Don't use match-beginning to check if the match succeeded. --- lisp/ChangeLog | 5 +++++ lisp/textmodes/ispell.el | 3 +-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f7b03c122b1..cdfb4618547 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-12-02 Stefan Monnier + + * textmodes/ispell.el (check-ispell-version): Don't use match-beginning + to check if the match succeeded. + 2000-12-02 Gerd Moellmann * startup.el (use-fancy-splash-screens-p): New function. diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 77c98d9cf4d..9776b74753b 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -747,8 +747,7 @@ Otherwise returns the library path if defined." ispell-version)) (message result)) ;; return library path. - (re-search-forward "LIBDIR = \\\"\\([^ \t\n]*\\)\\\"" nil t) - (if (match-beginning 0) + (if (re-search-forward "LIBDIR = \\\"\\([^ \t\n]*\\)\\\"" nil t) (setq result (buffer-substring (match-beginning 1) (match-end 1))))) (goto-char (point-min)) (if (not (memq status '(0 nil))) -- 2.39.5