--- a/MenuPanel.st	Mon Feb 04 17:41:11 2013 +0100
+++ b/MenuPanel.st	Fri Feb 08 19:41:11 2013 +0100
@@ -8539,7 +8539,7 @@
 
 initialize
 
-    semaLock := RecursionLock new.
+    semaLock := RecursionLock new name:'MenuPanel ScrollActivity'.
     icons    := Array new:4.
 ! !
 
@@ -8655,11 +8655,11 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.545 2013-02-04 16:41:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.546 2013-02-08 18:41:11 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.545 2013-02-04 16:41:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.546 2013-02-08 18:41:11 stefan Exp $'
 ! !