mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(check-ispell-version): Don't use match-beginning

Browse source 
to check if the match succeeded.
This commit is contained in:
Stefan Monnier 2000-12-02 20:28:44 +00:00
parent 285991dceb
commit 27ce741e2b
2 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/textmodes/ispell.el
View file

@ -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)))