1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 02:51:31 -08:00

Version number change only

This commit is contained in:
Carsten Dominik 2006-02-22 07:21:49 +00:00
parent 4af5848098
commit 5d2a58e007
9 changed files with 62 additions and 60 deletions

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;;
;; This file is part of GNU Emacs.
@ -33,7 +33,7 @@
(require 'reftex)
;;;
(defun reftex-view-crossref (&optional arg auto-how)
(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 at `\\ref' macro, show corresponding `\\label'
definition, also in external documents (`xr'). When on a label, show
@ -56,6 +56,7 @@ to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'."
dw)
(if (or (null macro) (reftex-in-comment))
(or fail-quietly
(error "Not on a crossref macro argument"))
(setq reftex-call-back-to-this-buffer (current-buffer))
@ -101,7 +102,7 @@ to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'."
(format action key) group nil nil))
(throw 'exit t))))
(error "Not on a crossref macro argument"))))
(if (and (eq arg 2) (windowp dw)) (select-window dw))))
(if (and (eq arg 2) (windowp dw)) (select-window dw)))))
(defun reftex-view-cr-cite (arg key how)
;; View crossreference of a ref cite. HOW can have the values
@ -243,7 +244,7 @@ With argument, actually select the window showing the cross reference."
(not (memq last-command '(reftex-view-crossref
reftex-mouse-view-crossref)))
;; Quick precheck if this might be a relevant spot
;; FIXME: Can fail with backslash in comment
;; `reftex-view-crossref' will do a more thorough check.
(save-excursion
(search-backward "\\" nil t)
(looking-at "\\\\[a-zA-Z]*\\(cite\\|ref\\|bibentry\\)"))
@ -252,9 +253,9 @@ With argument, actually select the window showing the cross reference."
(let ((current-prefix-arg nil))
(cond
((eq reftex-auto-view-crossref t)
(reftex-view-crossref -1 'echo))
(reftex-view-crossref -1 'echo 'quiet))
((eq reftex-auto-view-crossref 'window)
(reftex-view-crossref -1 'tmp-window))
(reftex-view-crossref -1 'tmp-window 'quiet))
(t nil)))
(error nil))))
@ -267,7 +268,8 @@ With argument, actually select the window showing the cross reference."
;; Display crossref info in echo area.
(cond
((null docstruct)
(message "%s" (substitute-command-keys (format reftex-no-info-message "ref"))))
(message "%s"
(substitute-command-keys (format reftex-no-info-message "ref"))))
((null entry)
(message "ref: unknown label: %s" label))
(t

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;;
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.

View file

@ -3,7 +3,7 @@
;; 2006 Free Software Foundation, Inc.
;; Author: Carsten Dominik <dominik@science.uva.nl>
;; Version: VERSIONTAG
;; Version: 4.31
;; This file is part of GNU Emacs.