From: Arthur Axel 'fREW' Schmidt Date: Sun, 24 Oct 2010 20:59:47 +0000 (-0500) Subject: Do not show_progress by default X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=17c25d88d37a4f5d46ddeef4f6cfaa83b425019f;p=scpubgit%2FQ-Branch.git Do not show_progress by default --- diff --git a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm index ea40e97..8a8c659 100644 --- a/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm +++ b/lib/DBIx/Class/Storage/Debug/PrettyPrint.pm @@ -23,7 +23,7 @@ sub new { my $c = \&Term::ANSIColor::color; $c->('blink white on_black') . 'EXECUTING...' . $c->('reset');; } : 'EXECUTING...'; - my $show_progress = defined $args->{show_progress} ? $args->{show_progress} : 1; + my $show_progress = $args->{show_progress}; my $squash_repeats = $args->{squash_repeats}; my $sqlat = SQL::Abstract::Tree->new($args);