From e1dfe562e71e01062bfa92124c8c3c684a4e6280 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Thu, 2 Aug 2007 18:29:08 +0000
Subject: fix debugging urpmf callback

---
 urpmf | 5 ++---
 1 file 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);
 }
 
-- 
cgit v1.2.1