summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-03-26 13:35:33 +0000
committerThierry Vignaud <tv@mandriva.org>2009-03-26 13:35:33 +0000
commite1acc727bd24d3b36c489cc2361ed2ce7e4a2d78 (patch)
tree08507680860fb0110b20a4828413257c40f2abdb
parentb32cef1e38a0eb5167893cfa3434491d03412bd1 (diff)
downloadurpmi-e1acc727bd24d3b36c489cc2361ed2ce7e4a2d78.tar
urpmi-e1acc727bd24d3b36c489cc2361ed2ce7e4a2d78.tar.gz
urpmi-e1acc727bd24d3b36c489cc2361ed2ce7e4a2d78.tar.bz2
urpmi-e1acc727bd24d3b36c489cc2361ed2ce7e4a2d78.tar.xz
urpmi-e1acc727bd24d3b36c489cc2361ed2ce7e4a2d78.zip
perl_checker cleanups
-rwxr-xr-xgurpmi26
1 files changed, 3 insertions, 3 deletions
diff --git a/gurpmi2 b/gurpmi2
index b310c22c..9940b23a 100755
--- a/gurpmi2
+++ b/gurpmi2
@@ -338,7 +338,7 @@ sub do_install_3 () {
1;
},
trans_log => sub {
- my ($mode, $file, $percent, $total, $eta, $speed) = @_;
+ my ($mode, $file, $percent, $_total, $_eta, $_speed) = @_;
urpm::download::sync_logger(@_);
@@ -383,7 +383,6 @@ sub do_install_3 () {
my $w = Gtk2::MessageDialog->new($mainw, [qw(modal destroy-with-parent)], 'warning', 'ok',
join("\n", values %$need_restart_formatted)
);
- my $response = $w->run;
$w->destroy;
},
missing_files_summary => sub {
@@ -422,7 +421,8 @@ sub do_install_3 () {
}
sub ask_yes_or_no {
- my ($title, $msg) = @_;
+ my ($_title, $msg) = @_;
+ # MessageDialogs have no titles unless using 'secondary-text'
my $w = Gtk2::MessageDialog->new($mainw, [qw(modal destroy-with-parent)], 'warning', 'yes-no', $msg);
my $response = $w->run;
$w->destroy;