Leave quotes from DBIC in bindargs
[dbsrgits/SQL-Abstract.git] / t / dbic / no-repeats.t
index fd53867..29842f0 100644 (file)
@@ -9,9 +9,9 @@ open my $fh, '>', \$cap;
 
 my $pp = DBIx::Class::Storage::Debug::PrettyPrint->new({
    profile => 'none',
-   no_repeats => 1,
+   squash_repeats => 1,
    fill_in_placeholders => 1,
-   placeholder_surround => [qw(' ')],
+   placeholder_surround => ['', ''],
    show_progress => 0,
 });
 
@@ -20,7 +20,7 @@ $pp->debugfh($fh);
 $pp->query_start('SELECT * FROM frew WHERE id = ?', q('1'));
 is(
    $cap,
-   qq(SELECT * FROM frew WHERE id = '1'\n\n),
+   qq(SELECT * FROM frew WHERE id = '1'\n),
    'SQL Logged'
 );
 
@@ -28,7 +28,7 @@ open $fh, '>', \$cap;
 $pp->query_start('SELECT * FROM frew WHERE id = ?', q('2'));
 is(
    $cap,
-   qq(... : '2'\n\n),
+   qq(... : '2'\n),
    'Repeated SQL ellided'
 );
 
@@ -36,7 +36,7 @@ open $fh, '>', \$cap;
 $pp->query_start('SELECT * FROM frew WHERE id = ?', q('3'));
 is(
    $cap,
-   qq(... : '3'\n\n),
+   qq(... : '3'\n),
    'Repeated SQL ellided'
 );
 
@@ -44,7 +44,7 @@ open $fh, '>', \$cap;
 $pp->query_start('SELECT * FROM frew WHERE id = ?', q('4'));
 is(
    $cap,
-   qq(... : '4'\n\n),
+   qq(... : '4'\n),
    'Repeated SQL ellided'
 );
 
@@ -52,7 +52,7 @@ open $fh, '>', \$cap;
 $pp->query_start('SELECT * FROM bar WHERE id = ?', q('4'));
 is(
    $cap,
-   qq(SELECT * FROM bar WHERE id = '4'\n\n),
+   qq(SELECT * FROM bar WHERE id = '4'\n),
    'New SQL Logged'
 );
 
@@ -60,7 +60,7 @@ open $fh, '>', \$cap;
 $pp->query_start('SELECT * FROM frew WHERE id = ?', q('1'));
 is(
    $cap,
-   qq(SELECT * FROM frew WHERE id = '1'\n\n),
+   qq(SELECT * FROM frew WHERE id = '1'\n),
    'New SQL Logged'
 );