Silence compilation of startup.el.

* lisp/startup.el (package-enable-at-startup, package-initialize):
Silence compiler.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 79bd52cec6f37033bc7d57d65048933556d1f51a..45bee01c97d245c65313c6a5bef08179ab4c0556 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-11-01  Glenn Morris  <rgm@gnu.org>
 
+       * startup.el (package-enable-at-startup, package-initialize):
+       Silence compiler.
+
        * progmodes/ada-mode.el (ada-font-lock-syntactic-keywords):
        Silence compiler.
 

diff --git a/lisp/startup.el b/lisp/startup.el
index 31fb7507295c95765e91a54b043f89ec829a9566..5343da65a1018db52baff052b17d76c1f98e1448 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1,7 +1,7 @@
 ;;; startup.el --- process Emacs shell arguments
 
-;; Copyright (C) 1985, 1986, 1992, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
-;;   2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
+;; Copyright (C) 1985, 1986, 1992, 1994, 1995, 1996, 1997, 1998, 1999,
+;;   2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
 ;;   Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
@@ -691,6 +691,9 @@ opening the first frame (e.g. open a connection to an X server).")
 
 (defvar server-name)
 (defvar server-process)
+;; Autoload in package.el, but when we bootstrap, we don't have loaddefs yet.
+(defvar package-enable-at-startup)
+(declare-function package-initialize "package" ())
 
 (defun command-line ()
   (setq before-init-time (current-time)
@@ -2381,5 +2384,4 @@ A fancy display is used on graphic displays, normal otherwise."
       (setq file (replace-match "/" t t file)))
     file))
 
-;; arch-tag: 7e294698-244d-4758-984b-4047f887a5db
 ;;; startup.el ends here