my ($error_color, $warning_color, $command_color, $highlight_color, $normal) = "";
-my $me;
+our $me;
BEGIN {
# Extract relative path and basename from script name.
sub dbug($) {
my ($self, $msg) = @_;
- $self->log("DEBUG: $msg") unless get_debug;
+ $self->log("DEBUG: $msg") if get_debug;
return;
} # dbug