summaryrefslogtreecommitdiff
path: root/lisp/info-xref.el
diff options
context:
space:
mode:
authorJuanma Barranquero <lekktu@gmail.com>2005-08-26 10:51:12 +0000
committerJuanma Barranquero <lekktu@gmail.com>2005-08-26 10:51:12 +0000
commit623f14653d85e0831ea4bc782c1aff41fb7f0ae5 (patch)
tree5a4684f0c5553b13653c61f5962dc811ca48596e /lisp/info-xref.el
parent735d70263198e21c61a040c6db4179ae6fcb67bf (diff)
downloademacs-623f14653d85e0831ea4bc782c1aff41fb7f0ae5.tar.gz
Move the `defvar's to the top level.
Diffstat (limited to 'lisp/info-xref.el')
-rw-r--r--lisp/info-xref.el40
1 files changed, 19 insertions, 21 deletions
diff --git a/lisp/info-xref.el b/lisp/info-xref.el
index 1a9b196a764..18d64cf0a1c 100644
--- a/lisp/info-xref.el
+++ b/lisp/info-xref.el
@@ -138,27 +138,25 @@ should open up the purported top file and see what subfiles it says."
;; Some dynamic variables are used to share information with sub-functions
;; below.
;;
-(eval-when-compile
- ;;
- ;; info-xref-filename-header - a heading message for the current top-level
- ;; filename, or "" when it's been printed.
- ;;
- (defvar info-xref-xfile-alist)
- ;;
- ;; info-xref-good - count of good cross references.
- ;;
- (defvar info-xref-good)
- ;;
- ;; info-xref-bad - count of bad cross references.
- ;;
- (defvar info-xref-bad)
- ;;
- ;; info-xref-xfile-alist - indexed by "(foo)" with value nil or t according
- ;; to whether "(foo)" exists or not. This is used to suppress duplicate
- ;; messages about foo not being available. (Duplicates within one
- ;; top-level file that is.)
- ;;
- (defvar info-xref-filename-heading))
+;; info-xref-filename-header - a heading message for the current top-level
+;; filename, or "" when it's been printed.
+;;
+(defvar info-xref-xfile-alist)
+;;
+;; info-xref-good - count of good cross references.
+;;
+(defvar info-xref-good)
+;;
+;; info-xref-bad - count of bad cross references.
+;;
+(defvar info-xref-bad)
+;;
+;; info-xref-xfile-alist - indexed by "(foo)" with value nil or t according
+;; to whether "(foo)" exists or not. This is used to suppress duplicate
+;; messages about foo not being available. (Duplicates within one
+;; top-level file that is.)
+;;
+(defvar info-xref-filename-heading)
(defun info-xref-check-list (filename-list)
"Check external references in info documents in FILENAME-LIST."