From a24c45d2bd2ef0e298e5ec52469a0e1eea8d1e70 Mon Sep 17 00:00:00 2001
From: Romain Francoise <romain@orebokech.com>
Date: Sat, 27 Aug 2005 14:38:22 +0000
Subject: [PATCH] * progmodes/compile.el (compilation-start): Add autoload
 cookie.

* progmodes/antlr-mode.el: Don't autoload `compilation-start'.
* textmodes/sgml-mode.el: Likewise.
* progmodes/python.el: Likewise.
---
 lisp/ChangeLog               | 8 ++++++++
 lisp/progmodes/antlr-mode.el | 2 --
 lisp/progmodes/compile.el    | 1 +
 lisp/progmodes/python.el     | 1 -
 lisp/textmodes/sgml-mode.el  | 2 --
 5 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e8ef15dea3..1b7eb7d931 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2005-08-27  Romain Francoise  <romain@orebokech.com>
+
+	* progmodes/compile.el (compilation-start): Add autoload cookie.
+
+	* progmodes/antlr-mode.el: Don't autoload `compilation-start'.
+	* textmodes/sgml-mode.el: Likewise.
+	* progmodes/python.el: Likewise.
+
 2005-08-27  Eli Zaretskii  <eliz@gnu.org>
 
 	* simple.el (blink-matching-paren-distance): Document the meaning
diff --git a/lisp/progmodes/antlr-mode.el b/lisp/progmodes/antlr-mode.el
index 88ad7098c8..229bec56dd 100644
--- a/lisp/progmodes/antlr-mode.el
+++ b/lisp/progmodes/antlr-mode.el
@@ -2229,8 +2229,6 @@ vocabulary of the super-grammar or nil if it is not needed."
     (cons (if glibs (concat " -glib " (mapconcat 'car glibs ";")) "")
 	  (cons unknown glibs))))
 
-(autoload 'compilation-start "compile")
-
 (defun antlr-run-tool (command file &optional saved)
   "Run Antlr took COMMAND on grammar FILE.
 When called interactively, COMMAND is read from the minibuffer and
diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 878159fb1b..b41cc601fe 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -911,6 +911,7 @@ Otherwise, construct a buffer name from MODE-NAME."
     (compilation-start command nil name-function highlight-regexp)))
 (make-obsolete 'compile-internal 'compilation-start)
 
+;;;###autoload
 (defun compilation-start (command &optional mode name-function highlight-regexp)
   "Run compilation command COMMAND (low level interface).
 If COMMAND starts with a cd command, that becomes the `default-directory'.
diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el
index f543143190..433476f795 100644
--- a/lisp/progmodes/python.el
+++ b/lisp/progmodes/python.el
@@ -67,7 +67,6 @@
 (eval-when-compile
   (require 'compile)
   (autoload 'info-lookup-maybe-add-help "info-look"))
-(autoload 'compilation-start "compile")
 
 (defgroup python nil
   "Silly walks in the Python language."
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el
index 0d4281c172..d331ce05ff 100644
--- a/lisp/textmodes/sgml-mode.el
+++ b/lisp/textmodes/sgml-mode.el
@@ -901,8 +901,6 @@ With prefix argument ARG, repeat this ARG times."
 		  (forward-list)))))))
 
 
-(autoload 'compilation-start "compile")
-
 (defun sgml-validate (command)
   "Validate an SGML document.
 Runs COMMAND, a shell command, in a separate process asynchronously
-- 
2.20.1