Mercurial > emacs
changeset 93097:bb437302d206
* textmodes/refbib.el:
* textmodes/reftex.el:
* textmodes/reftex-global.el:
* textmodes/reftex-vars.el:
* textmodes/reftex-toc.el: Don't use eval-and-compile for byte
compiler pacifying defvars.
(reftex-toc-mode): Only make zmacs-regions local on XEmacs.
* textmodes/reftex-index.el (zmacs-regions): Remove pacifier, not
needed.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Thu, 20 Mar 2008 07:44:16 +0000 |
| parents | ea3c318451b4 |
| children | 531ffecceb32 |
| files | lisp/textmodes/refbib.el lisp/textmodes/reftex-global.el lisp/textmodes/reftex-index.el lisp/textmodes/reftex-toc.el lisp/textmodes/reftex-vars.el lisp/textmodes/reftex.el |
| diffstat | 6 files changed, 24 insertions(+), 28 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/refbib.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/refbib.el Thu Mar 20 07:44:16 2008 +0000 @@ -223,17 +223,16 @@ (defvar r2b-error-found nil) -(eval-when-compile - (defvar r2b-variables) (defvar r2bv-address) (defvar r2bv-annote) - (defvar r2bv-author) (defvar r2bv-booktitle) (defvar r2bv-date) - (defvar r2bv-decade) (defvar r2bv-editor) (defvar r2bv-entry-kind) - (defvar r2bv-institution) (defvar r2bv-journal) (defvar r2bv-keywords) - (defvar r2bv-kn) (defvar r2bv-month) (defvar r2bv-note) - (defvar r2bv-number) (defvar r2bv-ordering) (defvar r2bv-organization) - (defvar r2bv-pages) (defvar r2bv-primary-author) (defvar r2bv-publisher) - (defvar r2bv-school) (defvar r2bv-title) (defvar r2bv-title-first-word) - (defvar r2bv-tr) (defvar r2bv-type) (defvar r2bv-volume) - (defvar r2bv-where) (defvar r2bv-year)) +(defvar r2b-variables) (defvar r2bv-address) (defvar r2bv-annote) +(defvar r2bv-author) (defvar r2bv-booktitle) (defvar r2bv-date) +(defvar r2bv-decade) (defvar r2bv-editor) (defvar r2bv-entry-kind) +(defvar r2bv-institution) (defvar r2bv-journal) (defvar r2bv-keywords) +(defvar r2bv-kn) (defvar r2bv-month) (defvar r2bv-note) +(defvar r2bv-number) (defvar r2bv-ordering) (defvar r2bv-organization) +(defvar r2bv-pages) (defvar r2bv-primary-author) (defvar r2bv-publisher) +(defvar r2bv-school) (defvar r2bv-title) (defvar r2bv-title-first-word) +(defvar r2bv-tr) (defvar r2bv-type) (defvar r2bv-volume) +(defvar r2bv-where) (defvar r2bv-year) (setq r2b-variables '( r2b-error-found
--- a/lisp/textmodes/reftex-global.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/reftex-global.el Thu Mar 20 07:44:16 2008 +0000 @@ -102,9 +102,8 @@ (tags-query-replace from to (or delimited current-prefix-arg) (list 'reftex-all-document-files)))) -(eval-when-compile - (defvar TeX-master) - (defvar isearch-next-buffer-function)) +(defvar TeX-master) +(defvar isearch-next-buffer-function) (defun reftex-find-duplicate-labels () "Produce a list of all duplicate labels in the document."
--- a/lisp/textmodes/reftex-index.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/reftex-index.el Thu Mar 20 07:44:16 2008 +0000 @@ -35,7 +35,6 @@ ;; START remove for XEmacs release (defvar mark-active) -(defvar zmacs-regions) (defvar transient-mark-mode) (defvar TeX-master) ;; END remove for XEmacs release
--- a/lisp/textmodes/reftex-toc.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/reftex-toc.el Thu Mar 20 07:44:16 2008 +0000 @@ -36,7 +36,6 @@ "Keymap used for *toc* buffer.") (defvar reftex-toc-menu) -(eval-when-compile (defvar zmacs-regions)) (defvar reftex-last-window-height nil) (defvar reftex-last-window-width nil) (defvar reftex-toc-include-labels-indicator nil) @@ -57,7 +56,8 @@ mode-name "TOC") (use-local-map reftex-toc-map) (set (make-local-variable 'transient-mark-mode) t) - (set (make-local-variable 'zmacs-regions) t) + (when (featurep 'xemacs) + (set (make-local-variable 'zmacs-regions) t)) (set (make-local-variable 'revert-buffer-function) 'reftex-toc-revert) (set (make-local-variable 'reftex-toc-include-labels-indicator) "") (set (make-local-variable 'reftex-toc-max-level-indicator)
--- a/lisp/textmodes/reftex-vars.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/reftex-vars.el Thu Mar 20 07:44:16 2008 +0000 @@ -27,7 +27,7 @@ ;;; Commentary: ;;; Code: -(eval-when-compile (defvar reftex-tables-dirty)) +(defvar reftex-tables-dirty) (eval-when-compile (require 'cl)) (eval-and-compile (defun reftex-set-dirty (symbol value)
--- a/lisp/textmodes/reftex.el Thu Mar 20 06:38:35 2008 +0000 +++ b/lisp/textmodes/reftex.el Thu Mar 20 07:44:16 2008 +0000 @@ -613,16 +613,15 @@ ;;; ========================================================================= ;;; ;;; Silence warnings about variables in other packages. -(eval-when-compile - (defvar TeX-master) - (defvar LaTeX-section-hook) - (defvar LaTeX-label-function) - (defvar tex-main-file) - (defvar outline-minor-mode) - (defvar font-lock-mode) - (defvar font-lock-keywords) - (defvar font-lock-fontify-region-function) - (defvar font-lock-syntactic-keywords)) +(defvar TeX-master) +(defvar LaTeX-section-hook) +(defvar LaTeX-label-function) +(defvar tex-main-file) +(defvar outline-minor-mode) +(defvar font-lock-mode) +(defvar font-lock-keywords) +(defvar font-lock-fontify-region-function) +(defvar font-lock-syntactic-keywords) ;;; ========================================================================= ;;;