--- a/Tools__CodeViewService.st	Fri Sep 06 01:19:02 2013 +0200
+++ b/Tools__CodeViewService.st	Fri Sep 06 01:19:43 2013 +0200
@@ -132,10 +132,11 @@
 
     | cls |
 
-    ^self requiredServices allSatisfy:[:clsName|
-        cls := Smalltalk at: clsName.
-        cls notNil and:[cls allRequiredServicesAvailable and:[cls isAvailable]]                        
-    ].
+    ^self requiredServices 
+        allSatisfy:[:clsName|
+            cls := Smalltalk at: clsName.
+            cls notNil and:[cls allRequiredServicesAvailable and:[cls isAvailable]]                        
+        ].
 
     "Created: / 27-07-2011 / 11:49:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
@@ -410,10 +411,10 @@
 !CodeViewService class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeViewService.st,v 1.13 2013-07-22 12:02:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeViewService.st,v 1.14 2013-09-05 23:19:43 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__CodeViewService.st,v 1.13 2013-07-22 12:02:16 cg Exp $'
+    ^ '$Id: Tools__CodeViewService.st,v 1.14 2013-09-05 23:19:43 cg Exp $'
 ! !