From 7416fc537c6f60b0bd82fad024a4bf905bb9ccb8 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 10 Aug 2007 15:37:58 +0000 Subject: (perform_installation) handle 'allow-force' and 'allow-nodeps' options --- Rpmdrake/pkg.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/Rpmdrake/pkg.pm b/Rpmdrake/pkg.pm index a8c0f8ce..216a20c9 100755 --- a/Rpmdrake/pkg.pm +++ b/Rpmdrake/pkg.pm @@ -608,7 +608,13 @@ sub perform_installation { #- (partially) duplicated from /usr/sbin/urpmi :-( }, inst => $callback_inst, trans => $callback_inst, - ask_yes_or_no => sub { }, # FIXME: allow-force & the like weren't previously implemented + ask_yes_or_no => sub { + # handle 'allow-force' and 'allow-nodeps' options: + my ($title, $msg) = @_; + local $::main_window = $Rpmdrake::gurpm::mainw->{real_window}; + interactive_msg($title, $msg, yesno => 1, if_(10 < $msg =~ tr/\n/\n/, scroll => 1), + ) or goto return_with_exit_code; + }, message => sub { my ($message) = @_; interactive_msg(N("Error"), $message, yesno => 1); -- cgit v1.2.1