comparison lisp/info-xref.el @ 65137:4377043d399d

Move the `defvar's to the top level.

65136:d66de68f18cb

;; 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))

(defun info-xref-check-list (filename-list)
  "Check external references in info documents in FILENAME-LIST."
  (pop-to-buffer info-xref-results-buffer t)
  (erase-buffer)

65137:4377043d399d

;; Some dynamic variables are used to share information with sub-functions
;; below.
;;
;; 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."
  (pop-to-buffer info-xref-results-buffer t)
  (erase-buffer)