if (&IsParam("VERBOSITY")) {
if ($statcountfix) {
- printf $_red."!%5d!".$ob." ", $statcount;
+ printf $_red."!%6d!".$ob." ", $statcount;
} else {
- printf $_green."[%5d]".$ob." ", $statcount;
+ printf $_green."[%6d]".$ob." ", $statcount;
}
# three uberstabs to Derek Moeller.
&status("Closed SQL Debug file: $param{'SQLDebug'}");
}
+sub SQLDebug {
+ return unless (&IsParam("SQLDebug"));
+
+ return unless (fileno SQLDEBUG);
+
+ print SQLDEBUG $_[0]."\n";
+}
+
1;