class: Tools::CodeView2
authorClaus Gittinger <cg@exept.de>
Wed, 19 Nov 2014 21:42:22 +0100
changeset 14850 f8e181db4a2f
parent 14849 6a193ec6c01f
child 14851 eeee217e8bee
class: Tools::CodeView2
Tools__CodeView2.st
--- a/Tools__CodeView2.st	Wed Nov 19 21:40:55 2014 +0100
+++ b/Tools__CodeView2.st	Wed Nov 19 21:42:22 2014 +0100
@@ -2516,7 +2516,7 @@
 
     "/ if there is either ONLY a breakpoint service which has an annotation
     "/ or none has an annotation, return the breakpoint service's message
-    (servicesWithAnnotations isEmpty
+    (servicesWithAnnotations isEmptyOrNil
     or:[ servicesWithAnnotations size == 1 and:[servicesWithAnnotations first == bpntService]]) ifTrue:[
         (bpntService notNil and:[ bpntService isEnabled ]) ifTrue:[
             serviceToShowHelpFor := bpntService
@@ -4088,15 +4088,15 @@
 !CodeView2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.170 2014-11-19 20:35:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.171 2014-11-19 20:42:22 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.170 2014-11-19 20:35:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeView2.st,v 1.171 2014-11-19 20:42:22 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeView2.st,v 1.170 2014-11-19 20:35:15 cg Exp $'
+    ^ '$Id: Tools__CodeView2.st,v 1.171 2014-11-19 20:42:22 cg Exp $'
 ! !