projects
/
scpubgit/Q-Branch.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
expand bangoverrides from order_by keys too for compat reasons
[scpubgit/Q-Branch.git]
/
examples
/
dbic-console.pl
diff --git
a/examples/dbic-console.pl
b/examples/dbic-console.pl
index
dc3b19c
..
5054424
100644
(file)
--- a/
examples/dbic-console.pl
+++ b/
examples/dbic-console.pl
@@
-1,10
+1,13
@@
#!/sur/bin/env perl
+use warnings;
+use strict;
+
use DBIx::Class::Storage::Debug::PrettyPrint;
my $pp = DBIx::Class::Storage::Debug::PrettyPrint->new({
profile => 'console',
- show_progress => 0,
+ show_progress => 1,
});
$pp->txn_begin;