StandaloneStartup.st
changeset 18180 177321c514a9
parent 18179 8b63ebabc699
child 18192 32a7c53ef4d0
child 18525 6b76f94a31ae
--- a/StandaloneStartup.st	Sat Mar 28 16:57:57 2015 +0100
+++ b/StandaloneStartup.st	Sun Mar 29 03:07:59 2015 +0200
@@ -430,8 +430,9 @@
 !
 
 verboseInfo:msg
-    Verbose == true ifFalse:[^ self].
-    self printInfo:msg
+    Verbose == true ifTrue:[
+        self printInfo:msg
+    ]
 
     "Modified: / 19-09-2006 / 16:30:27 / cg"
 ! !
@@ -1220,11 +1221,11 @@
 !StandaloneStartup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.90 2015-03-28 15:57:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.91 2015-03-29 01:07:59 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.90 2015-03-28 15:57:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/StandaloneStartup.st,v 1.91 2015-03-29 01:07:59 cg Exp $'
 ! !