focusFollowsMouse is default
authorClaus Gittinger <cg@exept.de>
Tue, 30 Mar 1999 09:49:02 +0200
changeset 2089 acdd1feb6bf7
parent 2088 8339c3a7dca3
child 2090 2be63e632db1
focusFollowsMouse is default
AbstractLauncherApplication.st
--- a/AbstractLauncherApplication.st	Mon Mar 29 23:49:40 1999 +0200
+++ b/AbstractLauncherApplication.st	Tue Mar 30 09:49:02 1999 +0200
@@ -2295,7 +2295,7 @@
     hostNameInLabelHolder := hostNameInLabel asValue.
     returnFocus := StandardSystemView returnFocusWhenClosingModalBoxes asValue.
     takeFocus := StandardSystemView takeFocusWhenMapped asValue.
-    focusFollowsMouse := UserPreferences current focusFollowsMouse asValue.
+    focusFollowsMouse := (UserPreferences current focusFollowsMouse ? true) asValue.
     activateOnClick := (Display class activateOnClick:nil) asValue.
     opaqueVariablePanelResize := (VariablePanelController opaqueResize ? false) asValue.
 
@@ -4291,5 +4291,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.20 1999-03-29 10:07:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.21 1999-03-30 07:49:02 cg Exp $'
 ! !