#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Tue, 06 Sep 2016 18:07:04 +0200
changeset 7547 de2dcd42f0bb
parent 7546 830c4ba33493
child 7548 8d61326b88fe
child 7549 feafeb92feda
#BUGFIX by cg class: SimpleView changed: #create fix missing device, if reopened after a destroy
SimpleView.st
--- a/SimpleView.st	Tue Sep 06 09:54:35 2016 +0200
+++ b/SimpleView.st	Tue Sep 06 18:07:04 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -9503,6 +9505,7 @@
 "/                ]
 "/            ]
         ] ifFalse:[
+            device isNil ifTrue:[ device := Screen current ].
             "/
             "/ if the display is not already dispatching events,
             "/ this starts the event process.