@@ -108,11 +108,11 @@
 ;; "," => "\n"
 (define (dboard:test-patt->lines test-patt)
   (string-substitute (regexp ",") "\n" test-patt))
 
 (define (dboard:lines->test-patt lines)
-  (string-substitute (regexp "\n") "," lines))
+  (string-substitute (regexp "\n") "," lines #t))
 
 
 ;;======================================================================
 ;; P R O C E S S   R U N S
 ;;======================================================================