--- a/UserPreferences.st	Mon Nov 29 18:17:53 2010 +0100
+++ b/UserPreferences.st	Mon Nov 29 19:48:07 2010 +0100
@@ -1215,6 +1215,30 @@
     "
 !
 
+delayedMenuShowAndHide
+    "the Windows behavior of showing submenus of a menu slightly delayed,
+     to allow for short-time leaving of the mouse pointer.
+     (bug #D1480943)"
+
+    ^ self at:#delayedMenuShowAndHide ifAbsent:true
+
+    "Created: / 29-11-2010 / 19:47:21 / cg"
+!
+
+delayedMenuShowAndHide:aBoolean
+    "the Windows behavior of showing submenus of a menu slightly delayed,
+     to allow for short-time leaving of the mouse pointer.
+     (bug #D1480943)"
+
+    ^ self at:#delayedMenuShowAndHide put:aBoolean
+
+    "
+     UserPreferences current delayedMenuShowAndHide
+    "
+
+    "Created: / 29-11-2010 / 19:47:36 / cg"
+!
+
 expandSelectionOnMouseMoveWithButtonPressed
     "expand the selection in a selectionInListView if the mouse is pressed while moving over
      more lines. Default is not FALSE !!"
@@ -3387,9 +3411,9 @@
 !UserPreferences class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.263 2010-11-21 19:19:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.264 2010-11-29 18:48:07 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.263 2010-11-21 19:19:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/UserPreferences.st,v 1.264 2010-11-29 18:48:07 cg Exp $'
 ! !