1 |
;;; reftex-index.el --- index support with RefTeX |
;;; reftex-index.el --- index support with RefTeX |
2 |
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. |
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc. |
3 |
|
|
4 |
;; Author: Carsten Dominik <dominik@strw.LeidenUniv.nl> |
;; Author: Carsten Dominik <dominik@science.uva.nl> |
5 |
;; Version: 4.16 |
;; Version: 4.17 |
6 |
|
|
7 |
;; This file is part of GNU Emacs. |
;; This file is part of GNU Emacs. |
8 |
|
|
1819 |
(unwind-protect |
(unwind-protect |
1820 |
(while (re-search-forward re nil t) |
(while (re-search-forward re nil t) |
1821 |
(catch 'next-match |
(catch 'next-match |
1822 |
|
(if (and (fboundp reftex-index-verify-function) |
1823 |
|
(not (funcall reftex-index-verify-function))) |
1824 |
|
(throw 'next-match nil)) |
1825 |
(setq match (match-string 0)) |
(setq match (match-string 0)) |
1826 |
(setq mathp |
(setq mathp |
1827 |
(save-match-data |
(save-match-data |