remove dep on Data::Dumper::Concise
[dbsrgits/DBIx-Class-Schema-Loader.git] / t / 23dumpmore.t
index 8f48199..61b3429 100644 (file)
@@ -2,7 +2,7 @@ use strict;
 use Test::More;
 use File::Path;
 use IPC::Open3;
-use Data::Dumper::Concise;
+use DBIx::Class::Schema::Loader::Utils 'dumper_squashed';
 use DBIx::Class::Schema::Loader ();
 use DBIx::Class::Schema::Loader::Optional::Dependencies ();
 use File::Temp 'tempfile';
@@ -42,7 +42,7 @@ sub dump_dbicdump {
     my @cmd = ($^X, qw(./script/dbicdump));
 
     while (my ($opt, $val) = each(%{ $tdata{options} })) {
-        $val = Dumper($val) if ref $val;
+        $val = dumper_squashed $val if ref $val;
         push @cmd, '-o', "$opt=$val";
     }