only print when conversion is really happening

tct/src/tct/FileConversionProject.kiss

@@ -231,11 +231,11 @@
 
 (method :Void fullAutoConvert [:String->Dynamic reportError]
     (doFor [idx block] (enumerate blocks)
-        (print "Converting block $(+ idx 1)/${blocks.length}")
         (when (or block.locked block.outText) (continue))
         (let [vc (validConversions idx reportError)]
             (when (= 1 (count vc))
                 (doFor =>conversionName text vc
+                    (print "Converting block $(+ idx 1)/${blocks.length}")
                     (editBlock idx null text null))))))
 
 (method :Null<Int> findText [:String text &opt :Int startingIdx :Bool caseSensitive]