InfoBox.st
changeset 355 a55f62047156
parent 243 5c411425097d
child 367 bc778f90e42d
--- a/InfoBox.st	Sat Feb 10 17:57:06 1996 +0100
+++ b/InfoBox.st	Sun Feb 11 10:55:05 1996 +0100
@@ -13,10 +13,10 @@
 
 
 DialogBox subclass:#InfoBox
-	 instanceVariableNames:'formLabel textLabel'
-	 classVariableNames:'InfoBitmap'
-	 poolDictionaries:''
-	 category:'Views-DialogBoxes'
+	instanceVariableNames:'formLabel textLabel'
+	classVariableNames:'InfoBitmap'
+	poolDictionaries:''
+	category:'Views-DialogBoxes'
 !
 
 !InfoBox class methodsFor:'documentation'!
@@ -39,6 +39,18 @@
 
 documentation
 "
+   Historic note:
+        originally, ST/X had separate classes for the various entry methods;
+        there were YesNoBox, EnterBox, InfoBox and so on.
+        In the meantime, the DialogBox class (and therefore its alias: Dialog)
+        is going to duplicate most funcionality found in these classes.
+
+        In the future, those existing subclasses' functionality is going to
+        be moved fully into Dialog, and the subclasses will be replaced by dummy
+        delegators. (They will be kept for backward compatibility, though).
+
+
+
     this class implements a pop-up box to show an information message.
     It has a single ok-Button, which closes the box.
     Also entering return has (by default) the same effect as pressing
@@ -49,9 +61,9 @@
 
     instance variables:
 
-	formLabel        <Label>        shows a bitmap (warning, question-mark)
+        formLabel        <Label>        shows a bitmap (warning, question-mark)
 
-	textLabel        <Label>        shows the boxes text
+        textLabel        <Label>        shows the boxes text
 
 "
 
@@ -297,5 +309,5 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.21 1995-12-07 22:23:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.22 1996-02-11 09:53:43 cg Exp $'
 ! !