commentary
authorClaus Gittinger <cg@exept.de>
Wed, 22 Jan 1997 18:17:33 +0100
changeset 380 c553cc1bbfa7
parent 379 62b71a8294a3
child 381 b8126729b7a4
commentary
ActiveHelpView.st
--- a/ActiveHelpView.st	Wed Jan 22 12:01:54 1997 +0100
+++ b/ActiveHelpView.st	Wed Jan 22 18:17:33 1997 +0100
@@ -19,7 +19,7 @@
 	category:'Interface-Help'
 !
 
-!ActiveHelpView  class methodsFor:'documentation'!
+!ActiveHelpView class methodsFor:'documentation'!
 
 copyright
 "
@@ -57,7 +57,7 @@
 "
 ! !
 
-!ActiveHelpView  class methodsFor:'instance creation'!
+!ActiveHelpView class methodsFor:'instance creation'!
 
 for:someText
     "create a talking-view for some text"
@@ -140,6 +140,8 @@
 !ActiveHelpView methodsFor:'initialization'!
 
 initStyle
+    "setup viewStyle specifics"
+
     <resource: #style (#activeHelpBackgroundColor
                        #activeHelpBorderWidth
                        #activeHelpStyle)>
@@ -160,7 +162,7 @@
 
     borderWidth := styleSheet at:'activeHelpBorderWidth' default:1.
 
-    "Modified: 29.5.1996 / 15:48:49 / cg"
+    "Modified: 22.1.1997 / 11:56:56 / cg"
 !
 
 initialize
@@ -314,8 +316,8 @@
     "Modified: 12.5.1996 / 21:58:12 / cg"
 ! !
 
-!ActiveHelpView  class methodsFor:'documentation'!
+!ActiveHelpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.15 1996-07-05 16:10:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.16 1997-01-22 17:17:33 cg Exp $'
 ! !