Commit 41116c5a authored by Glenn Morris's avatar Glenn Morris
Browse files

Manage reftex's internal autoloads automatically

* lisp/textmodes/reftex.el: Manage most autoloads automatically.

* lisp/textmodes/reftex-auc.el, lisp/textmodes/reftex-cite.el:
* lisp/textmodes/reftex-dcr.el, lisp/textmodes/reftex-global.el:
* lisp/textmodes/reftex-index.el, lisp/textmodes/reftex-parse.el:
* lisp/textmodes/reftex-ref.el, lisp/textmodes/reftex-sel.el:
* lisp/textmodes/reftex-toc.el: Set generated-autoload-file,
and add autoload cookies for reftex.el.

* lisp/Makefile.in (AUTOGEN_VCS): Add textmodes/reftex.el.
parent dd694335
2014-03-29 Glenn Morris <rgm@gnu.org>
* textmodes/reftex.el: Manage most autoloads automatically.
* textmodes/reftex-auc.el, textmodes/reftex-cite.el:
* textmodes/reftex-dcr.el, textmodes/reftex-global.el:
* textmodes/reftex-index.el, textmodes/reftex-parse.el:
* textmodes/reftex-ref.el, textmodes/reftex-sel.el:
* textmodes/reftex-toc.el: Set generated-autoload-file,
and add autoload cookies for reftex.el.
* Makefile.in (AUTOGEN_VCS): Add textmodes/reftex.el.
2014-03-28 Glenn Morris <rgm@gnu.org>
 
* cus-start.el (report-emacs-bug-address): Set custom properties.
......
......@@ -79,7 +79,8 @@ AUTOGEN_VCS = \
dired.el \
ibuffer.el \
htmlfontify.el \
emacs-lisp/eieio.el
emacs-lisp/eieio.el \
textmodes/reftex.el
# Value of max-lisp-eval-depth when compiling initially.
# During bootstrapping the byte-compiler is run interpreted when compiling
......
......@@ -47,6 +47,7 @@
(and (listp reftex-plug-into-AUCTeX)
(nth which reftex-plug-into-AUCTeX))))
;;;###autoload
(defun reftex-arg-label (optional &optional prompt definition)
"Use `reftex-label', `reftex-reference' or AUCTeX's code to insert label arg.
What is being used depends upon `reftex-plug-into-AUCTeX'."
......@@ -68,6 +69,7 @@ What is being used depends upon `reftex-plug-into-AUCTeX'."
(LaTeX-add-labels label))
(TeX-argument-insert label optional)))
;;;###autoload
(defun reftex-arg-cite (optional &optional prompt definition)
"Use `reftex-citation' or AUCTeX's code to insert a cite-key macro argument.
What is being used depends upon `reftex-plug-into-AUCTeX'."
......@@ -85,6 +87,7 @@ What is being used depends upon `reftex-plug-into-AUCTeX'."
optional)))
;;;###autoload
(defun reftex-arg-index-tag (optional &optional prompt &rest args)
"Prompt for an index tag with completion.
This is the name of an index, not the entry."
......@@ -104,6 +107,7 @@ This is the name of an index, not the entry."
(setq tag (read-string prompt)))
(TeX-argument-insert tag optional)))
;;;###autoload
(defun reftex-arg-index (optional &optional prompt &rest args)
"Prompt for an index entry completing with known entries.
Completion is specific for just one index, if the macro or a tag
......@@ -138,6 +142,7 @@ argument identify one of multiple indices."
(t "idx")))))
(defvar LaTeX-label-function)
;;;###autoload
(defun reftex-plug-into-AUCTeX ()
;; Replace AUCTeX functions with RefTeX functions.
;; Which functions are replaced is controlled by the variable
......@@ -162,6 +167,7 @@ argument identify one of multiple indices."
(fboundp 'TeX-arg-index)
(fset 'TeX-arg-index 'reftex-arg-index)))
;;;###autoload
(defun reftex-toggle-plug-into-AUCTeX ()
"Toggle Interface between AUCTeX and RefTeX on and off."
(interactive)
......@@ -173,6 +179,7 @@ argument identify one of multiple indices."
(message "RefTeX has been plugged into AUCTeX.")
(message "RefTeX no longer interacts with AUCTeX.")))
;;;###autoload
(defun reftex-add-label-environments (entry-list)
"Add label environment descriptions to `reftex-label-alist-style'.
The format of ENTRY-LIST is exactly like `reftex-label-alist'. See there
......@@ -197,8 +204,10 @@ the label information is recompiled on next use."
(push entry list)))
(when changed
(put reftex-docstruct-symbol 'reftex-label-alist-style list)))))
;;;###autoload
(defalias 'reftex-add-to-label-alist 'reftex-add-label-environments)
;;;###autoload
(defun reftex-add-section-levels (entry-list)
"Add entries to the value of `reftex-section-levels'.
The added values are kept local to the current document. The format
......@@ -219,9 +228,14 @@ of ENTRY-LIST is a list of cons cells (\"MACRONAME\" . LEVEL). See
(when changed
(put reftex-docstruct-symbol 'reftex-section-levels list)))))
;;;###autoload
(defun reftex-notice-new-section ()
(reftex-notice-new 1 'force))
(provide 'reftex-auc)
;;; reftex-auc.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -58,6 +58,7 @@
,@body)
(set-syntax-table saved-syntax))))
;;;###autoload
(defun reftex-default-bibliography ()
"Return the expanded value of variable `reftex-default-bibliography'.
The expanded value is cached."
......@@ -70,6 +71,7 @@ The expanded value is cached."
reftex-default-bibliography))
(get 'reftex-default-bibliography :reftex-expanded))
;;;###autoload
(defun reftex-bib-or-thebib ()
"Test if BibTeX or \begin{thebibliography} should be used for the citation.
Find the bof of the current file"
......@@ -89,6 +91,7 @@ Find the bof of the current file"
(if bib 'bib nil)
(if thebib 'thebib nil))))
;;;###autoload
(defun reftex-get-bibfile-list ()
"Return list of bibfiles for current document.
When using the chapterbib or bibunits package you should either
......@@ -112,6 +115,7 @@ Then this function will return the applicable database files."
(error "\\bibliography statement missing or .bib files not found")))
;;; Find a certain reference in any of the BibTeX files.
;;;###autoload
(defun reftex-pop-to-bibtex-entry (key file-list &optional mark-to-kill
highlight item return)
"Find BibTeX KEY in any file in FILE-LIST in another window.
......@@ -161,6 +165,7 @@ If RETURN is non-nil, just return the entry and restore point."
(error "No \\bibitem with citation key %s" key)
(error "No BibTeX entry with citation key %s" key)))))
;;;###autoload
(defun reftex-end-of-bib-entry (item)
(save-excursion
(condition-case nil
......@@ -452,6 +457,7 @@ If FIELD is empty try \"editor\" field."
(setq names (replace-match " " nil t names)))
(split-string names "\n")))
;;;###autoload
(defun reftex-parse-bibtex-entry (entry &optional from to raw)
"Parse BibTeX ENTRY.
If ENTRY is nil then parse the entry in current buffer between FROM and TO.
......@@ -604,6 +610,7 @@ If FORMAT is non-nil `format' entry accordingly."
;;; Make a citation
;; NB this is a global autoload - see reftex.el.
;;;###autoload
(defun reftex-citation (&optional no-insert format-key)
"Make a citation using BibTeX database files.
......@@ -787,11 +794,13 @@ in order to only add another reference in the same cite command."
(error "No citation format associated with key `%c'" key)))))
format))
;;;###autoload
(defun reftex-citep ()
"Call `reftex-citation' with a format selector `?p'."
(interactive)
(reftex-citation nil ?p))
;;;###autoload
(defun reftex-citet ()
"Call `reftex-citation' with a format selector `?t'."
(interactive)
......@@ -1058,6 +1067,7 @@ in order to only add another reference in the same cite command."
(setq format (replace-match "" t t format)))
format)
;;;###autoload
(defun reftex-make-cite-echo-string (entry docstruct-symbol)
"Format a bibtex ENTRY for the echo area and cache the result."
(let* ((key (reftex-get-bib-field "&key" entry))
......@@ -1151,6 +1161,7 @@ recommended for follow mode. It works OK for individual lookups."
(string-match "^&" (car pair)))
alist))))
;;;###autoload
(defun reftex-create-bibtex-file (bibfile)
"Create a new BibTeX database BIBFILE with all entries referenced in document.
The command prompts for a filename and writes the collected
......@@ -1244,3 +1255,7 @@ created files in the variables `reftex-create-bibtex-header' or
(provide 'reftex-cite)
;;; reftex-cite.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -30,6 +30,7 @@
(require 'reftex)
;;;###autoload
(defun reftex-view-crossref (&optional arg auto-how fail-quietly)
"View cross reference of macro at point. Point must be on the KEY
argument. When at a `\\ref' macro, show corresponding `\\label'
......@@ -220,6 +221,7 @@ to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'."
(when (equal arg 2)
(select-window pop-win)))))
;;;###autoload
(defun reftex-mouse-view-crossref (ev)
"View cross reference of \\ref or \\cite macro where you click.
If the macro at point is a \\ref, show the corresponding label definition.
......@@ -318,6 +320,7 @@ With argument, actually select the window showing the cross reference."
"Non-nil means use the idle timers in XEmacs for crossref display.
Currently, idle timer restart is broken and we use the post-command-hook.")
;;;###autoload
(defun reftex-toggle-auto-view-crossref ()
"Toggle the automatic display of crossref information in the echo area.
When active, leaving point idle in the argument of a \\ref or \\cite macro
......@@ -355,6 +358,7 @@ will display info in the echo area."
'reftex-view-crossref-when-idle
reftex-idle-time nil t))))
;;;###autoload
(defun reftex-view-crossref-from-bibtex (&optional arg)
"View location in a LaTeX document which cites the BibTeX entry at point.
Since BibTeX files can be used by many LaTeX documents, this function
......@@ -482,3 +486,7 @@ Calling this function several times find successive citation locations."
(provide 'reftex-dcr)
;;; reftex-dcr.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -29,6 +29,7 @@
(require 'reftex)
;;;
;;;###autoload
(defun reftex-create-tags-file ()
"Create TAGS file by running `etags' on the current document.
The TAGS file is also immediately visited with `visit-tags-table'."
......@@ -48,6 +49,7 @@ The TAGS file is also immediately visited with `visit-tags-table'."
(defvar reftex-grep-command "grep -n "
"Last grep command used in \\[reftex-grep-document]; default for next grep.")
;;;###autoload
(defun reftex-grep-document (grep-cmd)
"Run grep query through all files related to this document.
With prefix arg, force to rescan document.
......@@ -64,6 +66,7 @@ No active TAGS table is required."
(mapconcat 'identity files " "))))
(grep cmd)))
;;;###autoload
(defun reftex-search-document (&optional regexp)
"Regexp search through all files of the current document.
Starts always in the master file. Stops when a match is found.
......@@ -79,6 +82,7 @@ No active TAGS table is required."
(reftex-access-scan-info current-prefix-arg)
(tags-search regexp (list 'reftex-all-document-files))))
;;;###autoload
(defun reftex-query-replace-document (&optional from to delimited)
"Do `query-replace-regexp' of FROM with TO over the entire document.
Third arg DELIMITED (prefix arg) means replace only word-delimited matches.
......@@ -100,6 +104,7 @@ No active TAGS table is required."
(defvar TeX-master)
(defvar isearch-next-buffer-function)
;;;###autoload
(defun reftex-find-duplicate-labels ()
"Produce a list of all duplicate labels in the document."
......@@ -158,6 +163,7 @@ No active TAGS table is required."
(delete-window)
(message "Document does not contain duplicate labels."))))
;;;###autoload
(defun reftex-change-label (&optional from to)
"Run `query-replace-regexp' of FROM with TO in all macro arguments.
Works on the entire multifile document.
......@@ -177,6 +183,7 @@ No active TAGS table is required."
(concat "{" (regexp-quote from) "}")
(format "{%s}" to))))
;;;###autoload
(defun reftex-renumber-simple-labels ()
"Renumber all simple labels in the document to make them sequentially.
Simple labels are the ones created by RefTeX, consisting only of the
......@@ -304,6 +311,7 @@ one with the `xr' package."
(t nil))))))))
n))
;;;###autoload
(defun reftex-save-all-document-buffers ()
"Save all documents associated with the current document.
The function is useful after a global action like replacing or renumbering
......@@ -414,6 +422,7 @@ Also checks if buffers visiting the files are in read-only mode."
(when flist
(find-file-noselect (car flist))))))
;; NB this is a global autoload - see reftex.el.
;;;###autoload
(defun reftex-isearch-minor-mode (&optional arg)
"When on, isearch searches the whole document, not only the current file.
......@@ -466,3 +475,7 @@ With no argument, this command toggles
'reftex-isearch-minor-mode)
;;; reftex-global.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -35,6 +35,7 @@
(defvar TeX-master)
;; END remove for XEmacs release
;;;###autoload
(defun reftex-index-selection-or-word (&optional arg phrase)
"Put selection or the word near point into the default index macro.
This uses the information in `reftex-index-default-macro' to make an index
......@@ -87,6 +88,7 @@ which is part of AUCTeX, the string is first processed with the
(delete-region beg end)
(reftex-index def-char full-entry def-tag sel)))))
;;;###autoload
(defun reftex-index (&optional char key tag sel no-insert)
"Query for an index macro and insert it along with its arguments.
The index macros available are those defined in `reftex-index-macro' or
......@@ -156,6 +158,7 @@ will prompt for other arguments."
(member tag tag-list)))
(put reftex-docstruct-symbol 'default-index-tag tag)))
;;;###autoload
(defun reftex-index-complete-tag (&optional itag opt-args)
;; Ask the user for a tag, completing on known tags.
;; ITAG is the argument number which contains the tag.
......@@ -180,6 +183,7 @@ will prompt for other arguments."
(reftex-update-default-index tag)
tag))
;;;###autoload
(defun reftex-index-select-tag ()
;; Have the user select an index tag.
;; FIXME: should we cache tag-alist, prompt and help?
......@@ -249,6 +253,7 @@ will prompt for other arguments."
(error "No index tag associated with %c" rpl)))))
(t (error "This should not happen (reftex-index-select-tag)")))))
;;;###autoload
(defun reftex-index-complete-key (&optional tag optional initial)
;; Read an index key, with completion.
;; Restrict completion table on index tag TAG.
......@@ -434,6 +439,7 @@ _ ^ Add/Remove parent key (to make this item a subitem).
} / { Restrict Index to a single document section / Widen.
< / > When restricted, move restriction to previous/next section.")
;;;###autoload
(defun reftex-index-show-entry (data &optional no-revisit)
;; Find an index entry associated with DATA and display it highlighted
;; in another window. NO-REVISIT means we are not allowed to visit
......@@ -462,6 +468,7 @@ _ ^ Add/Remove parent key (to make this item a subitem).
(reftex-highlight 0 (match-beginning 0) (match-end 0) (current-buffer)))
match))
;;;###autoload
(defun reftex-display-index (&optional tag overriding-restriction redo
&rest locations)
"Display a buffer with an index compiled from the current document.
......@@ -1244,6 +1251,7 @@ This gets refreshed in every phrases command.")
table)
"Syntax table for RefTeX Index Phrases mode.")
;;;###autoload
(defun reftex-index-phrase-selection-or-word (arg)
"Add current selection or word at point to the phrases buffer.
When you are in transient-mark-mode and the region is active, the
......@@ -1258,6 +1266,7 @@ You get a chance to edit the entry in the phrases buffer - finish with
(substitute-command-keys
"Return to LaTeX with \\[reftex-index-phrases-save-and-return]"))))
;;;###autoload
(defun reftex-index-visit-phrases-buffer ()
"Switch to the phrases buffer, initialize if empty."
(interactive)
......@@ -1345,6 +1354,7 @@ If the buffer is non-empty, delete the old header first."
(defvar reftex-index-phrases-menu)
(defvar reftex-index-phrases-marker)
(defvar reftex-index-phrases-restrict-file nil)
;; NB this is a global autoload - see reftex.el.
;;;###autoload
(define-derived-mode reftex-index-phrases-mode fundamental-mode "Phrases"
"Major mode for managing the Index phrases of a LaTeX document.
......@@ -2096,3 +2106,7 @@ Does not do a save-excursion."
(provide 'reftex-index)
;;; reftex-index.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -37,17 +37,20 @@
,@body))
(set-syntax-table saved-syntax))))
;;;###autoload
(defun reftex-parse-one ()
"Re-parse this file."
(interactive)
(let ((reftex-enable-partial-scans t))
(reftex-access-scan-info '(4))))
;;;###autoload
(defun reftex-parse-all ()
"Re-parse entire document."
(interactive)
(reftex-access-scan-info '(16)))
;;;###autoload
(defun reftex-do-parse (rescan &optional file)
"Do a document rescan.
When allowed, do only a partial scan from FILE."
......@@ -165,11 +168,13 @@ When allowed, do only a partial scan from FILE."
(set reftex-docstruct-symbol docstruct)
(put reftex-docstruct-symbol 'modified t)))
;;;###autoload
(defun reftex-everything-regexp ()
(if reftex-support-index
reftex-everything-regexp
reftex-everything-regexp-no-index))
;; NB this is a global autoload - see reftex.el.
;;;###autoload
(defun reftex-all-document-files (&optional relative)
"Return a list of all files belonging to the current document.
......@@ -359,6 +364,7 @@ of master file."
(save-excursion
(re-search-forward "^[^%]*\\\\usepackage.*{biblatex}" nil t))))
;;;###autoload
(defun reftex-locate-bibliography-files (master-dir &optional files)
"Scan buffer for bibliography macros and return file list."
(unless files
......@@ -421,6 +427,7 @@ This function also makes sure the old toc markers do not point anywhere."
(setcdr (nthcdr (1- (length new)) new) (cdr eof-list)))
new))))
;;;###autoload
(defun reftex-section-info (file)
"Return a section entry for the current match.
Careful: This function expects the match-data to be still in place!"
......@@ -457,6 +464,7 @@ Careful: This function expects the match-data to be still in place!"
(list 'toc "toc" text file marker level section-number
literal (marker-position marker))))
;;;###autoload
(defun reftex-ensure-index-support (&optional abort)
"When index support is turned off, ask to turn it on and
set the current prefix argument so that `reftex-access-scan-info'
......@@ -472,11 +480,13 @@ will rescan the entire document."
(ding)
(sit-for 1)))))
;;;###autoload
(defun reftex-index-info-safe (file)
(reftex-with-special-syntax
(reftex-index-info file)))
(defvar test-dummy)
;;;###autoload
(defun reftex-index-info (file)
"Return an index entry for the current match.
Careful: This function expects the match-data to be still in place!"
......@@ -525,6 +535,7 @@ Careful: This function expects the match-data to be still in place!"
;; 0 1 2 3 4 5 6 7 8 9
(list 'index index-tag context file bom arg key showkey sortkey key-end))))
;;;###autoload
(defun reftex-short-context (env parse &optional bound derive)
"Get about one line of useful context for the label definition at point."
......@@ -585,6 +596,7 @@ Careful: This function expects the match-data to be still in place!"
(t
"INVALID VALUE OF PARSE"))))
;;;###autoload
(defun reftex-where-am-I ()
"Return the docstruct entry above point.
Actually returns a cons cell in which the cdr is a flag indicating
......@@ -683,6 +695,7 @@ if the information is exact (t) or approximate (nil)."
cnt 2))
(cons rtn (eq cnt 1))))
;;;###autoload
(defun reftex-notice-new (&optional n force)
"Hook to handshake with RefTeX after something new has been inserted."
;; Add a new entry to the docstruct list. If it is a section, renumber
......@@ -781,11 +794,13 @@ in TeX."
t)
(t nil)))
;;;###autoload
(defun reftex-what-macro-safe (which &optional bound)
"Call `reftex-what-macro' with special syntax table."
(reftex-with-special-syntax
(reftex-what-macro which bound)))
;;;###autoload
(defun reftex-what-macro (which &optional bound)
"Find out if point is within the arguments of any TeX-macro.
The return value is either (\"\\macro\" . (point)) or a list of them.
......@@ -848,6 +863,7 @@ considered an argument of macro \\macro."
(goto-char pos)))
(nreverse cmd-list)))))
;;;###autoload
(defun reftex-what-environment (which &optional bound)
"Find out if point is inside a LaTeX environment.
The return value is (e.g.) either (\"equation\" . (point)) or a list of
......@@ -885,6 +901,7 @@ this point. If it is nil, limit to nearest \\section - like statement."
(throw 'exit (cons env (point))))))
(nreverse env-list)))))
;;;###autoload
(defun reftex-what-special-env (which &optional bound)
"Run the special environment parsers and return the matches.
......@@ -944,6 +961,7 @@ in TeX."
(let ((entry (assoc key reftex-env-or-mac-alist)))
(reftex-nth-arg (nth 5 entry) (nth 6 entry))))
;;;###autoload
(defun reftex-nth-arg (n &optional opt-args)
"Return the Nth following {} or [] parentheses content.
OPT-ARGS is a list of argument numbers which are optional."
......@@ -982,6 +1000,7 @@ OPT-ARGS is a list of argument numbers which are optional."
(reftex-context-substring)
nil))))
;;;###autoload
(defun reftex-move-over-touching-args ()
(condition-case nil
(while (memq (following-char) '(?\[ ?\{))
......@@ -1021,6 +1040,7 @@ When point is just after a { or [, limit string to matching parenthesis"
;; Variable holding the vector with section numbers
(defvar reftex-section-numbers (make-vector reftex-max-section-depth 0))
;;;###autoload
(defun reftex-init-section-numbers (&optional toc-entry appendix)
"Initialize the section numbers with zeros or with what is found in the TOC-ENTRY."
(let* ((level (or (nth 5 toc-entry) -1))
......@@ -1039,6 +1059,7 @@ When point is just after a { or [, limit string to matching parenthesis"
(decf i)))
(put 'reftex-section-numbers 'appendix appendix))
;;;###autoload
(defun reftex-section-number (&optional level star)
"Return a string with the current section number.
When LEVEL is non-nil, increase section numbers on that level."
......@@ -1107,3 +1128,7 @@ When LEVEL is non-nil, increase section numbers on that level."
(provide 'reftex-parse)
;;; reftex-parse.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -29,6 +29,7 @@
(require 'reftex)
(require 'reftex-parse)
;;;###autoload
(defun reftex-label-location (&optional bound)
"Return the environment or macro which determines the label type at point.
If optional BOUND is an integer, limit backward searches to that point."
......@@ -62,6 +63,7 @@ If optional BOUND is an integer, limit backward searches to that point."
(t ;; This should not happen, I think?
"section"))))
;;;###autoload
(defun reftex-label-info-update (cell)
;; Update information about just one label in a different file.
;; CELL contains the old info list
......@@ -92,6 +94,7 @@ If optional BOUND is an integer, limit backward searches to that point."
(append (reftex-label-info label file) (list note)))
(list label typekey "" file "LOST LABEL. RESCAN TO FIX.")))))))
;;;###autoload
(defun reftex-label-info (label &optional file bound derive env-or-mac)
;; Return info list on LABEL at point.
(let* ((prefix (if (string-match "^[a-zA-Z0-9]+:" label)
......@@ -118,6 +121,7 @@ If optional BOUND is an integer, limit backward searches to that point."
;;; Creating labels ---------------------------------------------------------
;;;###autoload
(defun reftex-label (&optional environment no-insert)
"Insert a unique label. Return the label.
If ENVIRONMENT is given, don't bother to find out yourself.
......@@ -398,6 +402,7 @@ also applies `reftex-translate-to-ascii-function' to the string."
a / A Put all marked entries into one/many \\ref commands.
q / RET Quit without referencing / Accept current label (also on mouse-2).")
;;;###autoload
(defun reftex-reference (&optional type no-insert cut)
"Make a LaTeX reference. Look only for labels of a certain TYPE.
With prefix arg, force to rescan buffer for labels. This should only be
......@@ -705,6 +710,7 @@ When called with 2 C-u prefix args, disable magic word recognition."
(file (nth 3 data)))
(reftex-access-scan-info arg file)))))
;;;###autoload
(defun reftex-query-label-type ()
;; Ask for label type
(let ((key (reftex-select-with-char
......@@ -713,6 +719,7 @@ When called with 2 C-u prefix args, disable magic word recognition."
(error "No such label type: %s" (char-to-string key)))
(char-to-string key)))
;;;###autoload
(defun reftex-show-label-location (data forward no-revisit
&optional stay error)
;; View the definition site of a label in another window.
......@@ -837,6 +844,7 @@ Replace any occurrences of \"\\ref\" with REFSTYLE."
(setq fmt (replace-match refstyle t t fmt 1)))
(format fmt label))
;;;###autoload
(defun reftex-goto-label (&optional other-window)
"Prompt for a label (with completion) and jump to the location of this label.
Optional prefix argument OTHER-WINDOW goes to the label in another window."
......@@ -867,3 +875,7 @@ Optional prefix argument OTHER-WINDOW goes to the label in another window."
(provide 'reftex-ref)
;;; reftex-ref.el ends here
;; Local Variables:
;; generated-autoload-file: "reftex.el"
;; End:
......@@ -102,6 +102,7 @@
This keymap can be used to configure the label selection process which is
started with the command \\[reftex-reference].")
;;;###autoload
(define-derived-mode reftex-select-label-mode fundamental-mode "LSelect"
"Major mode for selecting a label in a LaTeX document.
This buffer was created with RefTeX.
......@@ -147,6 +148,7 @@ During a selection process, these are the local bindings.
This keymap can be used to configure the BibTeX selection process which is
started with the command \\[reftex-citation].")
;;;###autoload
(define-derived-mode reftex-select-bib-mode fundamental-mode "BSelect"
"Major mode for selecting a citation key in a LaTeX document.
This buffer was created with RefTeX.
......@@ -188,6 +190,7 @@ During a selection process, these are the local bindings.
;; (throw 'exit entry)))
;; nil))))
;;;###autoload
(defun reftex-get-offset (buf here-am-I &optional typekey toc index file)
;; Find the correct offset data, like insert-docstruct would, but faster.
;; Buffer BUF knows the correct docstruct to use.
......@@ -212,6 +215,7 @@ During a selection process, these are the local bindings.
(throw 'exit (or lastentry entry))))
nil))))
;;;###autoload