diff options
Diffstat (limited to 'urpm')
-rw-r--r-- | urpm/install.pm | 4 | ||||
-rw-r--r-- | urpm/main_loop.pm | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/urpm/install.pm b/urpm/install.pm index b970d93c..a6478b11 100644 --- a/urpm/install.pm +++ b/urpm/install.pm @@ -298,9 +298,9 @@ sub _get_callbacks { } }; - $options->{callback_uninst} = $options->{verbose} >= 0 ? \&install_logger : $erase_logger; + $options->{callback_uninst} ||= $options->{verbose} >= 0 ? \&install_logger : $erase_logger; - $options->{callback_error} = sub { + $options->{callback_error} ||= sub { my ($urpm, undef, $id, $subtype) = @_; my $n = $urpm->{depslist}[$id]->fullname; $urpm->{error}("ERROR: '$subtype' failed for $n: "); diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm index 66b211b3..099c68da 100644 --- a/urpm/main_loop.pm +++ b/urpm/main_loop.pm @@ -217,6 +217,7 @@ sub _init_common_options { justdb => $options{justdb}, replacepkgs => $options{replacepkgs}, callback_close_helper => $callbacks->{close_helper}, + callback_error => $callbacks->{error}, callback_inst => $callbacks->{inst}, callback_open_helper => $callbacks->{open_helper}, callback_trans => $callbacks->{trans}, @@ -411,6 +412,8 @@ Parameters: =item trans() called for transaction opening/progress/end +=item error() called for cpio, script or unpacking errors + =item callback_report_uninst(): called for erasure progrses =back |