summaryrefslogtreecommitdiffstats
path: root/perl-install/install/pkgs.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-03-03 14:01:44 +0000
committerThierry Vignaud <tv@mandriva.org>2009-03-03 14:01:44 +0000
commitf3d0f7b02f75ba0bcd400472d151e6de0005cdcc (patch)
tree03e0edcd0b6314cc9cb3675a2aef05ca09f1dea8 /perl-install/install/pkgs.pm
parent3aa293473357e6a5efe301948bfcfe4ff91ba8cd (diff)
downloaddrakx-backup-do-not-use-f3d0f7b02f75ba0bcd400472d151e6de0005cdcc.tar
drakx-backup-do-not-use-f3d0f7b02f75ba0bcd400472d151e6de0005cdcc.tar.gz
drakx-backup-do-not-use-f3d0f7b02f75ba0bcd400472d151e6de0005cdcc.tar.bz2
drakx-backup-do-not-use-f3d0f7b02f75ba0bcd400472d151e6de0005cdcc.tar.xz
drakx-backup-do-not-use-f3d0f7b02f75ba0bcd400472d151e6de0005cdcc.zip
(_install_raw) do not initialize new auto interactives objects
Diffstat (limited to 'perl-install/install/pkgs.pm')
-rw-r--r--perl-install/install/pkgs.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm
index 8424f4721..e5a6af107 100644
--- a/perl-install/install/pkgs.pm
+++ b/perl-install/install/pkgs.pm
@@ -758,7 +758,7 @@ sub _install_raw {
bad_signature => sub {
my ($msg, $msg2) = @_;
$msg =~ s/:$/\n\n/m; # FIXME: to be fixed in urpmi after 2008.0 (sic!)
- interactive->vnew->ask_yesorno(N("Warning"), "$msg\n\n$msg2");
+ $::o->ask_yesorno(N("Warning"), "$msg\n\n$msg2");
},
ask_retry => sub {
},
@@ -773,11 +773,11 @@ sub _install_raw {
},
message => sub {
my ($title, $message) = @_;
- interactive->vnew->ask_warn($title, $message);
+ $o->in and $o->in->ask_warn($title, $message);
},
ask_yes_or_no => sub {
my ($title, $msg) = @_;
- interactive->vnew->ask_yesorno($title, $msg);
+ $o->in and $o->in->ask_yesorno($title, $msg);
},
# Uneeded callbacks: success_summary
});