diff --git a/ChangeLog b/ChangeLog
index a9cb6101e..4ea463a7b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2000-08-26 Georg Fleischmann
+
+	* gui/Source/NSApplication.m [NSApplication run]: Don't update
+	menu for NSPeriodic and NSMouseMoved events.
+
 2000-08-27  Fred Kiefer  <FredKiefer@gmx.de>
 
 	* Source/NSFontPanel.m:
diff --git a/Source/NSApplication.m b/Source/NSApplication.m
index 9b05a683a..2e83ef641 100644
--- a/Source/NSApplication.m
+++ b/Source/NSApplication.m
@@ -883,11 +883,17 @@ static NSCell* tileCell = nil;
 			       inMode: NSDefaultRunLoopMode
 			      dequeue: YES];
       if (e)
-	[self sendEvent: e];
+      {  NSEventType	type = [e type];
 
-      // update (en/disable) the services menu's items
-      [listener updateServicesMenu];
-      [main_menu update];
+        [self sendEvent: e];
+
+        // update (en/disable) the services menu's items
+        if (type != NSPeriodic && type != NSMouseMoved)
+        {
+          [listener updateServicesMenu];
+          [main_menu update];
+        }
+      }
 
       // send an update message to all visible windows
       if (windows_need_update)