From e1dfe562e71e01062bfa92124c8c3c684a4e6280 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux 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