diff options
author | Thierry Vignaud <tv@mandriva.org> | 2008-02-06 14:14:06 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2008-02-06 14:14:06 +0000 |
commit | a908eff5182f1774163abdc724b81885b4cdaebf (patch) | |
tree | e2abcb8a3dc933906d3605e41873813749658a33 /rpmdrake.pm | |
parent | 6344550dcc74c84bf7c77c45ca329aa6458d55ee (diff) | |
download | rpmdrake-a908eff5182f1774163abdc724b81885b4cdaebf.tar rpmdrake-a908eff5182f1774163abdc724b81885b4cdaebf.tar.gz rpmdrake-a908eff5182f1774163abdc724b81885b4cdaebf.tar.bz2 rpmdrake-a908eff5182f1774163abdc724b81885b4cdaebf.tar.xz rpmdrake-a908eff5182f1774163abdc724b81885b4cdaebf.zip |
(build_tree,open_rpm_db,run_treeview_dialog,show_urpm_progress,Rpmdrake::widgets::new) kill warnings
Diffstat (limited to 'rpmdrake.pm')
-rw-r--r-- | rpmdrake.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rpmdrake.pm b/rpmdrake.pm index 549428a3..04c3993c 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -40,7 +40,7 @@ use c; use POSIX qw(_exit); use common; use Locale::gettext; - +use feature 'state'; our @ISA = qw(Exporter); our $VERSION = '2.27'; @@ -638,7 +638,7 @@ by Mandriva Linux Official Updates.")), %options sub show_urpm_progress { my ($label, $pb, $mode, $file, $percent, $total, $eta, $speed) = @_; $file =~ s|([^:]*://[^/:\@]*:)[^/:\@]*(\@.*)|$1xxxx$2|; #- if needed... - my $medium if 0; + state $medium; if ($mode eq 'copy') { $pb->set_fraction(0); $label->set_label(N("Copying file for medium `%s'...", $file)); |