Mercurial > emacs

changeset 71874:e727167b07e4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(make-autoload): Remove special handling of minor modes, redundant with the custom-autoload line above.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 13 Jul 2006 18:13:06 +0000
parents 0048306da39e
children 63d04f9d465a
files lisp/ChangeLog lisp/emacs-lisp/autoload.el
diffstat 2 files changed, 9 insertions(+), 15 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Jul 13 14:45:10 2006 +0000
+++ b/lisp/ChangeLog	Thu Jul 13 18:13:06 2006 +0000
@@ -1,7 +1,11 @@
+2006-07-13  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* emacs-lisp/autoload.el (make-autoload): Remove special handling of
+	minor modes, redundant with the custom-autoload line above.
+
 2006-07-12  Chong Yidong  <cyd@stupidchicken.com>
 
-	* longlines.el (longlines-post-command-function): Handle open-line
-	too.
+	* longlines.el (longlines-post-command-function): Handle open-line too.
 
 2006-07-12  Richard Stallman  <rms@gnu.org>
 
@@ -55,8 +59,8 @@
 	(vc-print-log): Run log-view-mode in process sentinel inside
 	inhibit-read-only.  Don't shrink window due to timing issues.
 
-	* progmodes/ebrowse.el (ebrowse-display-member-buffer): Avoid
-	using with-output-to-temp-buffer, which clobbers local vars.
+	* progmodes/ebrowse.el (ebrowse-display-member-buffer):
+	Avoid using with-output-to-temp-buffer, which clobbers local vars.
 
 2006-07-11  Stefan Monnier  <monnier@iro.umontreal.ca>
 
--- a/lisp/emacs-lisp/autoload.el	Thu Jul 13 14:45:10 2006 +0000
+++ b/lisp/emacs-lisp/autoload.el	Thu Jul 13 18:13:06 2006 +0000
@@ -124,17 +124,7 @@
 	    )
 	`(progn
 	   (defvar ,varname ,init ,doc)
-	   (custom-autoload ',varname ,file)
-           ;; The use of :require in a defcustom can be annoying, especially
-           ;; when defcustoms are moved from one file to another between
-           ;; releases because the :require arg gets placed in the user's
-           ;; .emacs.  In order for autoloaded minor modes not to need the
-           ;; use of :require, we arrange to store their :setter.
-           ,(let ((setter (condition-case nil
-                              (cadr (memq :set form))
-                            (error nil))))
-              (if (equal setter ''custom-set-minor-mode)
-                  `(put ',varname 'custom-set 'custom-set-minor-mode))))))
+	   (custom-autoload ',varname ,file))))
 
      ((eq car 'defgroup)
       ;; In Emacs this is normally handled separately by cus-dep.el, but for