#BUGFIX by stefan
authorStefan Vogel <sv@exept.de>
Wed, 20 Jul 2016 16:38:41 +0200
changeset 7440 c88ab4386e61
parent 7439 7cfe5815ca0f
child 7441 5e7b679c31ce
#BUGFIX by stefan class: WindowGroup changed: #setProcessNameWithRedirectIndicator:
WindowGroup.st
--- a/WindowGroup.st	Wed Jul 20 12:51:22 2016 +0200
+++ b/WindowGroup.st	Wed Jul 20 16:38:41 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -2425,7 +2427,9 @@
     ] ifFalse:[
         nm := 'window handler'.
     ].
-    myProcess name:nm.
+    myProcess notNil ifTrue:[
+        myProcess name:nm.
+    ].
 ! !
 
 !WindowGroup methodsFor:'keyboard control'!