SetInspectorView.st
changeset 647 1791ceddf2ef
parent 645 16a618dcbb43
child 794 b4b902784e00
--- a/SetInspectorView.st	Fri Jun 28 15:55:39 1996 +0200
+++ b/SetInspectorView.st	Fri Jun 28 16:12:50 1996 +0200
@@ -46,6 +46,16 @@
 
 !SetInspectorView methodsFor:'private'!
 
+defaultLabel
+    ^ 'contents'
+
+    "
+     (Set with:1 with:2 with:3) inspect
+    "
+
+    "Modified: 28.6.1996 / 16:05:42 / cg"
+!
+
 fieldList 
     "return a list of names for the selectionlist. Leave hasMore as
      true, if a '...' entry should be added."
@@ -132,7 +142,5 @@
 !SetInspectorView  class methodsFor:'documentation'!
 
 version
-"
-$Header: /cvs/stx/stx/libtool/SetInspectorView.st,v 1.4 1996-06-28 13:54:36 cg Exp $
-"
+    ^ '$Header: /cvs/stx/stx/libtool/SetInspectorView.st,v 1.5 1996-06-28 14:12:50 cg Exp $'
 ! !