*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 26 Feb 1998 03:01:45 +0100
changeset 1494 c54df3643894
parent 1493 3a714097f19d
child 1495 0c0719ee5c20
*** empty log message ***
InspView.st
InspectorView.st
--- a/InspView.st	Thu Feb 26 03:01:18 1998 +0100
+++ b/InspView.st	Thu Feb 26 03:01:45 1998 +0100
@@ -643,7 +643,7 @@
     "return a list of names to show in the selectionList.
      Leave hasMore as true, if a '...' entry should be added."
 
-    |aList n cls s|
+    |aList n cls|
 
     aList := OrderedCollection new.
     hideReceiver ifFalse:[aList add:'self'].
@@ -903,5 +903,5 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/InspView.st,v 1.70 1997-11-02 17:37:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/InspView.st,v 1.71 1998-02-26 02:01:45 cg Exp $'
 ! !
--- a/InspectorView.st	Thu Feb 26 03:01:18 1998 +0100
+++ b/InspectorView.st	Thu Feb 26 03:01:45 1998 +0100
@@ -643,7 +643,7 @@
     "return a list of names to show in the selectionList.
      Leave hasMore as true, if a '...' entry should be added."
 
-    |aList n cls s|
+    |aList n cls|
 
     aList := OrderedCollection new.
     hideReceiver ifFalse:[aList add:'self'].
@@ -903,5 +903,5 @@
 !InspectorView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.70 1997-11-02 17:37:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/InspectorView.st,v 1.71 1998-02-26 02:01:45 cg Exp $'
 ! !