comparison lisp/textmodes/reftex-parse.el @ 29775:31536c6cf2e3

* textmodes/reftex.el (reftex-find-citation-regexp-format): Support for bibentry. (reftex-compile-variables): Fixed problem with end of section-re. * texmodes/reftex-dcr.el (reftex-view-crossref, reftex-view-crossref-from-bibtex): Deal with changed `reftex-find-citation-regexp-format'. (reftex-view-regexp-match, reftex-view-crossref-from-bibtex): Replaced `remprop' with `put'. (reftex-view-crossref, reftex-view-crossref-when-idle): Support for bibentry. * textmodes/reftex-vars.el (reftex-cite-format-builtin): New entry for bibentry package. * textmodes/reftex-parse.el (reftex-locate-bibliography-files): Regexp also matches "\nobibliography". * textmodes/reftex-global.el (reftex-renumber-simple-labels): Call `reftex-ensure-write-access' before doing anything. (reftex-ensure-write-access): New function.

29774:8eff9cc9cbae

;;; reftex-parse.el - Parser Functions for RefTeX
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.

;; Author:     Carsten Dominik <[e-mail]>
;; Version: 4.11
;;

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify

  
  (unless files
    (save-excursion
      (goto-char (point-min))
      (if (re-search-forward
	   "\\(\\`\\|[\n\r]\\)[ \t]*\\\\bibliography{[ \t]*\\([^}]+\\)" nil t)
	  (setq files 
		(split-string (reftex-match-string 2)
			      "[ \t\n\r]*,[ \t\n\r]*")))))
  (when files
    (setq files 
	  (mapcar
	   (lambda (x)

29775:31536c6cf2e3

;;; reftex-parse.el - Parser Functions for RefTeX
;; Copyright (c) 1997, 1998, 1999, 2000 Free Software Foundation, Inc.

;; Author:     Carsten Dominik <[e-mail]>
;; Version: 4.14
;;

;; This file is part of GNU Emacs.

;; GNU Emacs is free software; you can redistribute it and/or modify

  
  (unless files
    (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]*")))))
  (when files
    (setq files 
	  (mapcar
	   (lambda (x)