Mercurial > emacs

changeset 64307:487eee037b09

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-484 Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 88-91) - Merge from emacs--cvs-trunk--0 - Update FSF's address in GPL notices - Update from CVS 2005-07-13 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/gnus-salt.el (gnus-pick-mode): Remove the 5th arg of gnus-add-minor-mode. (gnus-binary-mode): Ditto. * lisp/gnus/gnus-topic.el (gnus-topic-mode): Ditto.
author Miles Bader <miles@gnu.org>
date Thu, 14 Jul 2005 05:45:24 +0000
parents c7d6013c38b6
children 93129de4b8a4 fbb2bea03df9
files lisp/gnus/ChangeLog lisp/gnus/gnus-salt.el lisp/gnus/gnus-topic.el
diffstat 3 files changed, 13 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Thu Jul 14 02:10:34 2005 +0000
+++ b/lisp/gnus/ChangeLog	Thu Jul 14 05:45:24 2005 +0000
@@ -1,3 +1,11 @@
+2005-07-13  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* gnus-salt.el (gnus-pick-mode): Remove the 5th arg of
+	gnus-add-minor-mode.
+	(gnus-binary-mode): Ditto.
+
+	* gnus-topic.el (gnus-topic-mode): Ditto.
+
 2005-07-08  Ralf Angeli  <angeli@iwi.uni-sb.de>  (tiny change)
 
 	* gnus-art.el (gnus-article-next-page, gnus-article-next-page-1)
--- a/lisp/gnus/gnus-salt.el	Thu Jul 14 02:10:34 2005 +0000
+++ b/lisp/gnus/gnus-salt.el	Thu Jul 14 05:45:24 2005 +0000
@@ -128,8 +128,7 @@
       ;; Set up the menu.
       (when (gnus-visual-p 'pick-menu 'menu)
 	(gnus-pick-make-menu-bar))
-      (gnus-add-minor-mode 'gnus-pick-mode " Pick" gnus-pick-mode-map
-			   nil 'gnus-pick-mode)
+      (gnus-add-minor-mode 'gnus-pick-mode " Pick" gnus-pick-mode-map)
       (gnus-run-hooks 'gnus-pick-mode-hook))))
 
 (defun gnus-pick-setup-message ()
@@ -362,8 +361,7 @@
       ;; Set up the menu.
       (when (gnus-visual-p 'binary-menu 'menu)
 	(gnus-binary-make-menu-bar))
-      (gnus-add-minor-mode 'gnus-binary-mode " Binary"
-			   gnus-binary-mode-map nil 'gnus-binary-mode)
+      (gnus-add-minor-mode 'gnus-binary-mode " Binary" gnus-binary-mode-map)
       (gnus-run-hooks 'gnus-binary-mode-hook))))
 
 (defun gnus-binary-display-article (article &optional all-header)
--- a/lisp/gnus/gnus-topic.el	Thu Jul 14 02:10:34 2005 +0000
+++ b/lisp/gnus/gnus-topic.el	Thu Jul 14 05:45:24 2005 +0000
@@ -1,6 +1,6 @@
 ;;; gnus-topic.el --- a folding minor mode for Gnus group buffers
-;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
-;;        Free Software Foundation, Inc.
+;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
+;; 2005 Free Software Foundation, Inc.
 
 ;; Author: Ilja Weis <kult@uni-paderborn.de>
 ;;	Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -1136,10 +1136,7 @@
       (when (gnus-visual-p 'topic-menu 'menu)
 	(gnus-topic-make-menu-bar))
       (gnus-set-format 'topic t)
-      (gnus-add-minor-mode 'gnus-topic-mode " Topic"
-			   gnus-topic-mode-map nil (lambda (&rest junk)
-						     (interactive)
-						     (gnus-topic-mode nil t)))
+      (gnus-add-minor-mode 'gnus-topic-mode " Topic" gnus-topic-mode-map)
       (add-hook 'gnus-group-catchup-group-hook 'gnus-topic-update-topic)
       (set (make-local-variable 'gnus-group-prepare-function)
 	   'gnus-group-prepare-topics)