diff lisp/emacs-lisp/autoload.el @ 71955:e768c05d6e71

(make-autoload): Use new arg.

--- a/lisp/emacs-lisp/autoload.el	Mon Jul 17 21:26:32 2006 +0000
+++ b/lisp/emacs-lisp/autoload.el	Mon Jul 17 21:27:17 2006 +0000
@@ -124,7 +124,10 @@
 	    )
 	`(progn
 	   (defvar ,varname ,init ,doc)
-	   (custom-autoload ',varname ,file))))
+	   (custom-autoload ',varname ,file
+                            ,(condition-case nil
+                                 (null (cadr (memq :set form)))
+                               (error nil))))))
 
      ((eq car 'defgroup)
       ;; In Emacs this is normally handled separately by cus-dep.el, but for