fix debugging urpmf callback

1 files changed, 2 insertions, 3 deletions

diff --git a/urpmf b/urpmf
index ab681795..30e5a592 100755
--- a/urpmf
+++ b/urpmf
@@ -176,11 +176,10 @@ my $callback = join("\n",
        '0;'),
     "}");
 
-our $debug;
-$urpm->{error}("qf:[$qf]\ncallback:\n$callback") if $debug;
+$urpm->{debug}("qf:[$qf]\ncallback:\n$callback") if $urpm->{debug};
 $callback = eval $callback;
 if ($@) {
-    $debug and warn "Internal error: $@\n";
+    warn "Internal error: $@\n";
     exit(1);
 }