more output when running without debug
authorDobrica Pavlinusic <dpavlin@rot13.org>
Thu, 6 Nov 2008 10:53:59 +0000 (10:53 +0000)
committerDobrica Pavlinusic <dpavlin@rot13.org>
Thu, 6 Nov 2008 10:53:59 +0000 (10:53 +0000)
git-svn-id: svn://svn.rot13.org/SQL2XLS@24 2e857b76-582b-47e5-ad5c-b3ba0f0ee29b

sql2xls.cgi

index 5f23394..706cf92 100755 (executable)
@@ -99,7 +99,7 @@ $sql_dir .= "/$reports_path" if -e "$sql_dir/$reports_path";
 
 require_config;
 
-warn "# reading SQL queries from $sql_dir\n" if $debug;
+warn "SQL queries from $sql_dir\n";
 
 opendir(DIR, $sql_dir) || die "can't opendir $sql_dir: $!";
 my @sql_files = sort grep { /\.sql$/i && -f "$sql_dir/$_" } readdir(DIR);
@@ -195,7 +195,7 @@ foreach my $sql_file (@sql_files) {
 
        foreach my $sql ( split(/;/, $full_sql ) ) {
 
-               warn "SQL: $sql\n" if $debug;
+               warn "SQL: $sql\n";
 
                my $sth = $dbh->prepare($sql);
                $sth->execute();