--- a/OrderedCollectionInspectorView.st Mon Jun 10 22:17:07 1996 +0200
+++ b/OrderedCollectionInspectorView.st Wed Jun 12 14:12:02 1996 +0200
@@ -194,16 +194,17 @@
|index|
- lineNr == 1 ifTrue:[
- ^ inspectedObject
+ (lineNr isNil or:[lineNr == 1]) ifTrue:[
+ ^ inspectedObject
].
index := lineNr - 1. "/ skip self
^ inspectedObject at:index
+ "Modified: 11.6.1996 / 17:20:44 / cg"
! !
!OrderedCollectionInspectorView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.14 1996-04-25 16:32:26 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/OrderedCollectionInspectorView.st,v 1.15 1996-06-12 12:12:02 cg Exp $'
! !