(sieve-manage-mode): Ditto.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8739120..e1d749c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -4,6 +4,8 @@
        Youngs <steve@youngs.au.com> and suggested by Katsumi Yamaoka
        <yamaoka@jpl.org>.
 
+       * sieve.el (sieve-manage-mode): Ditto.
+
 2004-09-13  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-sum.el (gnus-summary-copy-article): Fixed doc string.

diff --git a/lisp/sieve.el b/lisp/sieve.el
index f464516..f95ae3e 100644 (file)
--- a/lisp/sieve.el
+++ b/lisp/sieve.el
@@ -1,5 +1,5 @@
 ;;; sieve.el --- Utilities to manage sieve scripts
-;; Copyright (C) 2001, 2003 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2003, 2004 Free Software Foundation, Inc.
 
 ;; Author: Simon Josefsson <simon@josefsson.org>
 
@@ -143,7 +143,7 @@ require \"fileinto\";
   (setq mode-name "SIEVE")
   (buffer-disable-undo (current-buffer))
   (setq truncate-lines t)
-  (easy-menu-add-item nil nil sieve-manage-mode-menu))
+  (easy-menu-add sieve-manage-mode-menu sieve-manage-mode-map))
 
 (put 'sieve-manage-mode 'mode-class 'special)