[Emacs-diffs] Changes to emacs/lisp/textmodes/reftex-parse.el

[Carsten Dominik]

Index: emacs/lisp/textmodes/reftex-parse.el
diff -c emacs/lisp/textmodes/reftex-parse.el:1.10 
emacs/lisp/textmodes/reftex-parse.el:1.11
*** emacs/lisp/textmodes/reftex-parse.el:1.10   Mon Jul 16 03:46:48 2001
--- emacs/lisp/textmodes/reftex-parse.el        Mon Jul 22 06:36:26 2002
***************
*** 1,8 ****
  ;;; reftex-parse.el --- parser functions for RefTeX
  ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
  
! ;; Author: Carsten Dominik <address@hidden>
! ;; Version: 4.16
  ;;
  
  ;; This file is part of GNU Emacs.
--- 1,8 ----
  ;;; reftex-parse.el --- parser functions for RefTeX
  ;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
  
! ;; Author: Carsten Dominik <address@hidden>
! ;; Version: 4.17
  ;;
  
  ;; This file is part of GNU Emacs.
***************
*** 198,203 ****
--- 198,204 ----
          toc-entry index-entry next-buf buf)
  
      (catch 'exit
+       (debug)
        (setq file-found (reftex-locate-file file "tex" master-dir))
        (if (and (not file-found)
               (setq buf (reftex-get-buffer-visiting file)))
***************
*** 334,340 ****
      (save-excursion
        (goto-char (point-min))
        (if (re-search-forward
!          "\\(\\`\\|[\n\r]\\)[ \t]*\\\\\\(no\\)?bibliography{[ 
\t]*\\([^}]+\\)" nil t)
          (setq files 
                (split-string (reftex-match-string 3)
                              "[ \t\n\r]*,[ \t\n\r]*")))))
--- 335,344 ----
      (save-excursion
        (goto-char (point-min))
        (if (re-search-forward
!          (concat
!           "\\(\\`\\|[\n\r]\\)[^%]*\\\\\\("
!           (mapconcat 'identity reftex-bibliography-commands "\\|")
!           "\\){[ \t]*\\([^}]+\\)") nil t)
          (setq files 
                (split-string (reftex-match-string 3)
                              "[ \t\n\r]*,[ \t\n\r]*")))))