[t/lib] diagnostics while initializing test db

moritz · Jun 21, 2011 · b2d83e4 · b2d83e4
1 parent 265eed4
commit b2d83e4
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/t/lib/Quelology/Test/Setup.pm b/t/lib/Quelology/Test/Setup.pm
@@ -1,3 +1,4 @@
+use 5.010;
 package Quelology::Test::Setup;
 use strict;
 use warnings;
@@ -15,7 +16,9 @@ sub init_db {
     # TODO: read that info from the config file
     my ($user, $dbname, $host) = map config($_), qw/dbuser dbname dbhost/;
 
+    say '# initilizing test db... this might take a while';
     system("psql $dbname -h $host -U $user < t/db-snapshot.sql > /dev/null 2>&1");
+    say '# ... done initilizing test db.';
 }
 
 1;