2004-01-07 Steve Youngs <sryoungs@bigpond.net.au>

	* run-at-time.el (run-at-time-saved): Move to after the definition
	of `run-at-time'.

	* dgnushack.el: Autoload `font-lock-fontify-buffer' in XEmacs.

Fixes a truck load of byte-compiler warnings under XEmacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 23a449d..6b78316 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,10 @@
+2004-01-07  Steve Youngs  <sryoungs@bigpond.net.au>
+
+       * run-at-time.el (run-at-time-saved): Move to after the definition
+       of `run-at-time'.
+
+       * dgnushack.el: Autoload `font-lock-fontify-buffer' in XEmacs.
+
 2004-01-06  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-art.el (gnus-article-wash-html-with-w3m): Don't use

diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el
index 449c956..4bc684b 100644 (file)
--- a/lisp/dgnushack.el
+++ b/lisp/dgnushack.el
@@ -148,6 +148,7 @@ than subr.el."
     (autoload 'dolist "cl-macs" nil nil 'macro)
     (autoload 'enriched-decode "enriched")
     (autoload 'executable-find "executable")
+    (autoload 'font-lock-fontify-buffer "font-lock" nil t)
     (autoload 'info "info" nil t)
     (autoload 'make-annotation "annotations")
     (autoload 'make-display-table "disp-table")

diff --git a/lisp/run-at-time.el b/lisp/run-at-time.el
index 25c3efd..0b41938 100644 (file)
--- a/lisp/run-at-time.el
+++ b/lisp/run-at-time.el
@@ -26,8 +26,6 @@
 ;; XEmacs has a buggy version of run-at-time.  This file defines a
 ;; non-buggy version of the same.
 
-(defvar run-at-time-saved (symbol-function 'run-at-time))
-
 (require 'itimer)
 
 (eval-and-compile
@@ -96,6 +94,8 @@ or `cancel-timer'."
                    1e-9 (if time (max time 1e-9) 1e-9)
                    nil t itimers repeat function args))))))))
 
+(defvar run-at-time-saved (symbol-function 'run-at-time))
+
 (provide 'run-at-time)
 
 ;;; run-at-time.el ends here