/[emacs]/emacs/lisp/textmodes/reftex-parse.el
ViewVC logotype

Diff of /emacs/lisp/textmodes/reftex-parse.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10 by pj, Mon Jul 16 07:46:48 2001 UTC revision 1.11 by cdominik, Mon Jul 22 10:36:26 2002 UTC
# Line 1  Line 1 
1  ;;; reftex-parse.el --- parser functions for RefTeX  ;;; reftex-parse.el --- parser functions for 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    
8  ;; This file is part of GNU Emacs.  ;; This file is part of GNU Emacs.
# Line 198  of master file." Line 198  of master file."
198          toc-entry index-entry next-buf buf)          toc-entry index-entry next-buf buf)
199    
200      (catch 'exit      (catch 'exit
201          (debug)
202        (setq file-found (reftex-locate-file file "tex" master-dir))        (setq file-found (reftex-locate-file file "tex" master-dir))
203        (if (and (not file-found)        (if (and (not file-found)
204                 (setq buf (reftex-get-buffer-visiting file)))                 (setq buf (reftex-get-buffer-visiting file)))
# Line 334  of master file." Line 335  of master file."
335      (save-excursion      (save-excursion
336        (goto-char (point-min))        (goto-char (point-min))
337        (if (re-search-forward        (if (re-search-forward
338             "\\(\\`\\|[\n\r]\\)[ \t]*\\\\\\(no\\)?bibliography{[ \t]*\\([^}]+\\)" nil t)             (concat
339                "\\(\\`\\|[\n\r]\\)[^%]*\\\\\\("
340                (mapconcat 'identity reftex-bibliography-commands "\\|")
341                "\\){[ \t]*\\([^}]+\\)") nil t)
342            (setq files            (setq files
343                  (split-string (reftex-match-string 3)                  (split-string (reftex-match-string 3)
344                                "[ \t\n\r]*,[ \t\n\r]*")))))                                "[ \t\n\r]*,[ \t\n\r]*")))))

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26