DialogBox.st
changeset 6080 185379fc3791
parent 6037 cd0dbf7aa43a
child 6115 b2a6f6a08d2f
--- a/DialogBox.st	Wed Feb 08 00:56:51 2017 +0100
+++ b/DialogBox.st	Wed Feb 08 00:56:57 2017 +0100
@@ -9922,6 +9922,8 @@
 !DialogBox methodsFor:'initialization & release'!
 
 initialize
+    <modifier: #super> "must be called if redefined"
+
     super initialize.
 
 "/    label := 'Dialog'.
@@ -9978,8 +9980,8 @@
        showAtPointer
     "
 
-    "Modified: / 23.12.1997 / 10:05:24 / md"
-    "Modified: / 27.7.1998 / 20:16:37 / cg"
+    "Modified: / 23-12-1997 / 10:05:24 / md"
+    "Modified: / 08-02-2017 / 00:26:26 / cg"
 !
 
 reAdjustGeometry