emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] trunk r113303: lisp/simple.el (alternatives-define): Remov


From: Juanma Barranquero
Subject: [Emacs-diffs] trunk r113303: lisp/simple.el (alternatives-define): Remove leftover :group keyword.
Date: Sat, 06 Jul 2013 13:32:14 +0000
User-agent: Bazaar (2.6b2)

------------------------------------------------------------
revno: 113303
revision-id: address@hidden
parent: address@hidden
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sat 2013-07-06 15:31:59 +0200
message:
  lisp/simple.el (alternatives-define): Remove leftover :group keyword.
  Tweak docstring.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/simple.el                 simple.el-20091113204419-o5vbwnq5f7feedwu-403
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-07-06 12:37:12 +0000
+++ b/lisp/ChangeLog    2013-07-06 13:31:59 +0000
@@ -1,3 +1,8 @@
+2013-07-06  Juanma Barranquero  <address@hidden>
+
+       * simple.el (alternatives-define): Remove leftover :group keyword.
+       Tweak docstring.
+
 2013-07-06  Leo Liu  <address@hidden>
 
        * ido.el (ido-use-virtual-buffers): Allow new value 'auto.

=== modified file 'lisp/simple.el'
--- a/lisp/simple.el    2013-07-06 09:35:37 +0000
+++ b/lisp/simple.el    2013-07-06 13:31:59 +0000
@@ -7368,7 +7368,7 @@
 will allow the user to chose among them.
 CUSTOMIZATIONS, if non-nil, should be composed of alternating
 `defcustom' keywords and values to add to the declaration of
-`COMMAND-alternatives' (typically to add new groups)."
+`COMMAND-alternatives' (typically :group and :version)."
   (let* ((command-name (symbol-name command))
          (varalt-name (concat command-name "-alternatives"))
          (varalt-sym (intern varalt-name))
@@ -7383,7 +7383,6 @@
 ALTFUN  - The function called to implement this alternative."
                   command-name)
          :type '(alist :key-type string :value-type function)
-         :group 'dispatcher
          ,@customizations)
 
        (defvar ,varimp-sym nil "Internal use only.")


reply via email to

[Prev in Thread] Current Thread [Next in Thread]