--- a/StandardSystemView.st	Tue Jul 22 19:56:20 2003 +0200
+++ b/StandardSystemView.st	Thu Aug 07 21:25:54 2003 +0200
@@ -1412,7 +1412,7 @@
 physicalCreate
     "common code for create & recreate"
 
-    |l icn icnMask|
+    |l icn icnMask windowClassNameString|
 
     l := self windowLabelFor:label.
 
@@ -1477,7 +1477,13 @@
     cursor notNil ifTrue:[
         self setCursor
     ].
-    device setWindowClass:('Stx', self className) name:name in:drawableId.
+
+    application isNil ifTrue:[
+        windowClassNameString := self className.
+    ] ifFalse:[
+        windowClassNameString := application className.
+    ].
+    self setWindowClass:('Stx.', windowClassNameString) name:"name"'bla'.
 
     "Modified: 14.6.1996 / 17:14:25 / stefan"
     "Modified: 22.9.1997 / 10:11:16 / cg"
@@ -1524,7 +1530,7 @@
 !StandardSystemView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.149 2003-05-07 14:56:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/StandardSystemView.st,v 1.150 2003-08-07 19:25:54 stefan Exp $'
 ! !
 
 StandardSystemView initialize!