#QUALITY by cg
authorClaus Gittinger <cg@exept.de>
Wed, 08 Feb 2017 00:57:34 +0100
changeset 3867 9b2f1d48773a
parent 3866 b8f8ff2312a1
child 3868 d60663c87c61
#QUALITY by cg class: SimpleDialog changed: #initialize
SimpleDialog.st
--- a/SimpleDialog.st	Wed Feb 08 00:51:29 2017 +0100
+++ b/SimpleDialog.st	Wed Feb 08 00:57:34 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1996 by eXept Software AG
               All Rights Reserved
@@ -315,6 +313,8 @@
 !SimpleDialog methodsFor:'initialization'!
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     accept := (ValueHolder with:false).
     close := (ValueHolder with:false).
     cancel := (ValueHolder with:false).
@@ -325,7 +325,7 @@
     escapeIsCancel := true.
     closeAllowedChannel := true
 
-    "Modified: / 19.6.1998 / 03:35:48 / cg"
+    "Modified: / 08-02-2017 / 00:34:07 / cg"
 !
 
 initializeBuilderFor:aView