--- a/Tools__Inspector2.st Fri Nov 18 15:06:10 2011 +0100
+++ b/Tools__Inspector2.st Fri Nov 18 15:06:17 2011 +0100
@@ -563,7 +563,7 @@
!Inspector2::NavigationState class methodsFor:'documentation'!
version
- ^'$Id: Tools__Inspector2.st,v 1.19 2011-09-05 05:05:15 cg Exp $'
+ ^'$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.20 2011-11-18 14:06:17 cg Exp $'
!
version_SVN
@@ -581,13 +581,14 @@
!
selectionIndex
- selectionIndex ifNil:[^1].
+ selectionIndex isNil ifTrue:[^1].
selectionIndex < 1 ifTrue:[^1].
selectionIndex > tabs size ifTrue:[^tabs size].
^selectionIndex
"Created: / 16-01-2008 / 17:24:27 / janfrog"
"Modified: / 17-02-2008 / 10:20:35 / janfrog"
+ "Modified: / 18-11-2011 / 15:00:01 / cg"
!
selectionIndex: anInteger
@@ -626,10 +627,11 @@
tabs
- tabs ifNil:[self initializeTabs].
+ tabs isNil ifTrue:[self initializeTabs].
^tabs
"Created: / 16-01-2008 / 16:51:53 / janfrog"
+ "Modified: / 18-11-2011 / 15:00:05 / cg"
!
theObject
@@ -763,11 +765,11 @@
!Inspector2 class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.19 2011-09-05 05:05:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.20 2011-11-18 14:06:17 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.19 2011-09-05 05:05:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2.st,v 1.20 2011-11-18 14:06:17 cg Exp $'
!
version_CVS_jvrany