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/widgets.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/widgets.pm')
| -rw-r--r-- | Rpmdrake/widgets.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Rpmdrake/widgets.pm b/Rpmdrake/widgets.pm index a3f5e56a..a1f689a3 100644 --- a/Rpmdrake/widgets.pm +++ b/Rpmdrake/widgets.pm @@ -30,12 +30,13 @@ use lib qw(/usr/lib/libDrakX); use mygtk2 qw(gtknew); #- do not import anything else, especially gtkadd() which conflicts with ugtk2 one use ugtk2 qw(:all); use Time::HiRes; +use feature 'state'; sub new { my ($_class) = @_; my $w = gtknew('TextView', editable => 0); - my $time if 0; + state $time; $w->signal_connect(size_allocate => sub { my ($w, $requisition) = @_; return if !ref($w->{anchors}); |