--- a/Tools__TagsBrowser.st Thu Mar 07 11:10:05 2013 +0000
+++ b/Tools__TagsBrowser.st Wed Mar 13 01:04:29 2013 +0000
@@ -2201,7 +2201,7 @@
oldSelection notNil ifTrue:[
oldLabel := oldSelection label.
- tagView selectElementForWhich:[:el | el label = oldLabel] ifAbsent:[self halt].
+ tagView selectElementForWhich:[:el | el label = oldLabel] ifAbsent:[self halt:'ouch - no such label'].
].
"Created: / 06-10-2011 / 13:41:57 / cg"
@@ -2600,11 +2600,11 @@
!TagsBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.31 2012-11-26 21:47:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.32 2013-03-06 09:02:15 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.31 2012-11-26 21:47:52 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.32 2013-03-06 09:02:15 cg Exp $'
!
version_HG