Hi Simon! Just keeping things neat and tidy. :-) NOTE: This patch has been committed. Gnus patch: ChangeLog files diff command: cvs -q diff -U 0 Files affected: lisp/ChangeLog Source files diff command: cvs -q diff -uN Files affected: lisp/password.el Index: lisp/ChangeLog =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/ChangeLog,v retrieving revision 7.34 diff -u -U0 -r7.34 ChangeLog --- lisp/ChangeLog 6 Jan 2004 01:53:45 -0000 7.34 +++ lisp/ChangeLog 6 Jan 2004 02:01:13 -0000 @@ -0,0 +1,5 @@ +2004-01-06 Steve Youngs + + * password.el: Only autoload `run-at-time' if not XEmacs. + Only autoload the itimer functions if XEmacs. + Index: lisp/password.el =================================================================== RCS file: /usr/local/cvsroot/gnus/lisp/password.el,v retrieving revision 7.1 diff -u -u -r7.1 password.el --- lisp/password.el 4 Jan 2004 22:49:38 -0000 7.1 +++ lisp/password.el 6 Jan 2004 02:01:09 -0000 @@ -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 @@ (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 -- |---------------------| | Ashes to ashes, dust to dust. | | The proof of the pudding, is under the crust. | |---------------------------------|