From xemacs-m  Mon May 19 11:15:10 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id LAA25098
	for <xemacs-beta@xemacs.org>; Mon, 19 May 1997 11:15:03 -0500 (CDT)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id SAA18251; Mon, 19 May 1997 18:14:59 +0200 (MET DST)
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: [patch] Easymenu fixlet
X-Save-Project-Gutenberg: <URL:http://www.promo.net/pg/nl/pgny_nov96.html>
X-Attribution: Hrv
X-Face: Mie8:rOV<\c/~z{s.X4A{!?vY7{drJ([U]0O=W/<W*SMo/Mv:58:*_y~ki>xDi&N7XG
        KV^$k0m3Oe/)'e%3=$PCR&3ITUXH,cK>]bci&<qQ>Ff%x_>1`T(+M2Gg/fgndU%k*ft
        [(7._6e0n-V%|%'[c|q:;}td$#INd+;?!-V=c8Pqf}3J
X-Flame: You're probably young yourself.
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 19 May 1997 18:14:59 +0200
Message-ID: <kig67wfsakc.fsf@jagor.srce.hr>
Lines: 28
X-Mailer: Gnus v5.4.52/XEmacs 20.2

Try pressing `t t' repeatedly in the Group buffer.  Mode menu popup
(on button3) keeps geeting repeated `Topics' entries.  This patch to
easymenu.el will fix it:

Mon May 19 18:13:50 1997  Hrvoje Niksic  <hniksic@srce.hr>

	* utils/easymenu.el (easy-menu-add): Check for existing, before
	entering MENU to `easy-menu-all-popups'.


--- lisp/utils/easymenu.el.orig	Mon May 19 18:11:59 1997
+++ lisp/utils/easymenu.el	Mon May 19 18:11:59 1997
@@ -168,7 +168,7 @@
   "Add MENU to the current menu bar."
   (if (featurep 'menubar)
       (progn
-	(setq easy-menu-all-popups (cons menu easy-menu-all-popups))
+	(pushnew menu easy-menu-all-popups)
 	(setq mode-popup-menu (cons (easy-menu-title)
 				    (reverse easy-menu-all-popups)))
 


-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
4.  Thou shalt not warlorde a sig if it bee the sig of Kibo, nor if
    it bee the sig of the Inner Circle.

