leftover halt
authorClaus Gittinger <cg@exept.de>
Wed, 10 Jun 2009 22:34:02 +0200
changeset 2564595b56327446
parent 2563 c2298d24621d
child 2565 00edcadc2f2f
leftover halt
UIPainter.st
     1.1 --- a/UIPainter.st	Wed Jun 10 22:33:37 2009 +0200
     1.2 +++ b/UIPainter.st	Wed Jun 10 22:34:02 2009 +0200
     1.3 @@ -5512,7 +5512,7 @@
     1.4      self askForModification ifFalse: [^nil].
     1.5      specClass := specClassName := specSelector := nil.
     1.6      self painter removeAll.
     1.7 -self halt.
     1.8 +"/ self halt.
     1.9      treeView canvas topView 
    1.10          name:  self defaultNameOfCanvas;
    1.11          label: self defaultNameOfCanvas.