--- a/DeviceWorkstation.st	Tue Oct 13 13:05:49 1998 +0200
+++ b/DeviceWorkstation.st	Tue Oct 13 14:38:47 1998 +0200
@@ -404,6 +404,15 @@
 
 !DeviceWorkstation class methodsFor:'accessing'!
 
+activateOnClick:aBoolean
+    "enable/disable raise&activate on click;
+     return the previous setting"
+
+    ^ false
+
+    "Created: / 2.10.1998 / 01:07:51 / cg"
+!
+
 buttonTranslation:anArray
     "set the button translation, #(1 2 3) is no-translation,
      #(3 2 1) is ok for left-handers"
@@ -6132,6 +6141,6 @@
 !DeviceWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.270 1998-10-02 10:48:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.271 1998-10-13 12:38:47 cg Exp $'
 ! !
 DeviceWorkstation initialize!