From 62350cdd1add35950b0312f5a0f0b1589dbc61b3 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Sun, 26 Jun 2005 18:21:46 +0000 Subject: [PATCH] (define-minor-mode): Don't automatically add a :require to the defcustom. --- lisp/ChangeLog | 27 +++++++++++++++++---------- lisp/emacs-lisp/easy-mmode.el | 5 +---- 2 files changed, 18 insertions(+), 14 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 82c389f3f08..bd5a4d85031 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2005-06-26 Stefan Monnier + + * emacs-lisp/easy-mmode.el (define-minor-mode): Don't automatically add + a :require to the defcustom. + + * emacs-lisp/autoload.el (make-autoload): Add the :setter for + defcustoms corresponding to minor modes. + 2005-06-26 David Ponce * recentf.el: Require 'tree-widget instead of 'wid-edit. @@ -6,8 +14,8 @@ (recentf-open-files-action): Doc fix. (recentf-dialog-goto-first): New function. (recentf-dialog-mode-map): Set parent keymap first. - (recentf-dialog-mode): Define with define-derived-mode. Don't - display continuation lines in dialogs. + (recentf-dialog-mode): Define with define-derived-mode. + Don't display continuation lines in dialogs. (recentf-edit-list): Rename from recentf-edit-selected-items. (recentf-edit-list-select): Rename from recentf-edit-list-action. Simplify. @@ -97,7 +105,7 @@ (line-move-1): When there are overlays around, use vertical-motion. * faces.el (escape-glyph): Use brown against light background. - (nobreak-space): Renamed from no-break-space. + (nobreak-space): Rename from no-break-space. Fix previous change. * dired-aux.el (dired-do-copy): Fix arg prompt. @@ -151,7 +159,7 @@ * bindings.el (propertized-buffer-identification): Use renamed `Buffer-menu-buffer' face. - * faces.el (vertical-border): Renamed from `vertical-divider'. + * faces.el (vertical-border): Rename from `vertical-divider'. (escape-glyph): Change dark-background color back to `cyan'. 2005-06-21 Juri Linkov @@ -237,8 +245,7 @@ 2005-06-18 Peter Kleiweg - * progmodes/ps-mode.el: Update version and maintainer's email - address. + * progmodes/ps-mode.el: Update version and maintainer's email address. 2005-06-18 Steve Youngs @@ -326,8 +333,8 @@ New backward-compatibility aliases for renamed faces. (eshell-ls-decorated-name): Use renamed eshell-ls faces. - * progmodes/cc-fonts.el (c-nonbreakable-space-face): Remove - "-face" suffix from face name. + * progmodes/cc-fonts.el (c-nonbreakable-space-face): + Remove "-face" suffix from face name. (c-cpp-matchers): Use the variable `c-nonbreakable-space-face' instead of literal face. @@ -455,8 +462,8 @@ ido-incomplete-regexp. (ido-incomplete-regexp): New face. (ido-completions): Use it. - (ido-complete, ido-exit-minibuffer, ido-completions): Handle - incomplete regexps. + (ido-complete, ido-exit-minibuffer, ido-completions): + Handle incomplete regexps. (ido-completions): Add check for complete match when entering a regexp. 2005-06-15 Stefan Monnier diff --git a/lisp/emacs-lisp/easy-mmode.el b/lisp/emacs-lisp/easy-mmode.el index a342f8a5530..6ee87919d38 100644 --- a/lisp/emacs-lisp/easy-mmode.el +++ b/lisp/emacs-lisp/easy-mmode.el @@ -201,10 +201,7 @@ See the command `%s' for a description of this minor-mode.")) :type 'boolean ,@(cond ((not (and curfile require)) nil) - ((not (eq require t)) `(:require ,require)) - (t `(:require - ',(intern (file-name-nondirectory - (file-name-sans-extension curfile)))))) + ((not (eq require t)) `(:require ,require))) ,@(nreverse extra-keywords)))) ;; The actual function. -- 2.39.2