2004-01-06 Steve Youngs <sryoungs@bigpond.net.au>
authorSteve Youngs <steve@sxemacs.org>
Tue, 6 Jan 2004 02:02:04 +0000 (02:02 +0000)
committerSteve Youngs <steve@sxemacs.org>
Tue, 6 Jan 2004 02:02:04 +0000 (02:02 +0000)
* password.el: Only autoload `run-at-time' if not XEmacs.
Only autoload the itimer functions if XEmacs.

lisp/ChangeLog
lisp/password.el

index 2137714..076b285 100644 (file)
@@ -1,3 +1,8 @@
+2004-01-06  Steve Youngs  <sryoungs@bigpond.net.au>
+
+       * password.el: Only autoload `run-at-time' if not XEmacs.
+       Only autoload the itimer functions if XEmacs.
+
 2004-01-06  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * gnus-xmas.el (gnus-xmas-define): Defun char-width for non-MULE
index b0d96a4..962d9b9 100644 (file)
@@ -52,7 +52,8 @@
 
 ;;; Code:
 
-(autoload 'run-at-time "timer")
+(unless (featurep 'xemacs)
+  (autoload 'run-at-time "timer"))
 
 (eval-when-compile
   (require 'cl))
@@ -83,15 +84,16 @@ The variable `password-cache' control whether the cache is used."
       (read-passwd prompt)))
 
 (eval-when-compile
-  (defvar itimer-process)
-  (defvar itimer-timer)
-  (autoload 'delete-itimer "itimer")
-  (autoload 'itimer-driver-start "itimer")
-  (autoload 'itimer-value "itimer")
-  (autoload 'set-itimer-function "itimer")
-  (autoload 'set-itimer-function-arguments "itimer")
-  (autoload 'set-itimer-restart "itimer")
-  (autoload 'start-itimer "itimer"))
+  (when (featurep 'xemacs)
+    (defvar itimer-process)
+    (defvar itimer-timer)
+    (autoload 'delete-itimer "itimer")
+    (autoload 'itimer-driver-start "itimer")
+    (autoload 'itimer-value "itimer")
+    (autoload 'set-itimer-function "itimer")
+    (autoload 'set-itimer-function-arguments "itimer")
+    (autoload 'set-itimer-restart "itimer")
+    (autoload 'start-itimer "itimer")))
 
 (eval-and-compile
   (defalias