--- a/DeviceWorkstation.st	Thu Nov 21 15:39:51 2002 +0100
+++ b/DeviceWorkstation.st	Thu Nov 21 20:43:07 2002 +0100
@@ -384,7 +384,8 @@
 
     MultiClickTimeDelta := 300.             "a click within 300ms is considered a double one"
     ButtonTranslation isNil ifTrue:[
-	ButtonTranslation := #(1 2 3 4 5 6 7)  "identity translation"
+        ButtonTranslation := #(1 2 2 2 2 2 2)  "all other buttons to middleButton menu"
+        "/ ButtonTranslation := #(1 2 3 4 5 6 7)  "identity translation"
     ].
 !
 
@@ -7608,7 +7609,7 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.432 2002-11-21 14:39:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.433 2002-11-21 19:43:07 cg Exp $'
 ! !
 
 DeviceWorkstation initialize!