author | Stefan Vogel <sv@exept.de> |
Wed, 20 Jul 2016 16:38:41 +0200 | |
changeset 7440 | c88ab4386e61 |
parent 7439 | 7cfe5815ca0f |
child 7441 | 5e7b679c31ce |
WindowGroup.st | file | annotate | diff | comparison | revisions |
--- 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'!