lib/rbbt/util/R.rb in rbbt-util-5.21.87 vs lib/rbbt/util/R.rb in rbbt-util-5.21.89

@@ -40,10 +40,15 @@
     Log.debug{"R Script:\n#{ cmd }"}
 
     if monitor
       io = CMD.cmd('R --no-save --quiet', options.merge(:in => cmd, :pipe => true, :log => true))
       while line = io.gets
-        puts line
+        case monitor
+        when Proc
+          monitor.call line
+        else
+          Log.debug "R: " <<  line
+        end
       end
       nil
     else
       CMD.cmd('R --no-save --slave --quiet', options.merge(:in => cmd))
     end