diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2002-08-02 13:30:49 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-08-02 13:30:49 +0000 |
commit | 8b96f8d0ca7cef761e48a54ba331ffc91bf8b094 (patch) | |
tree | 1f2c2214f166b5877997773042c35c8a2d7c0fe5 | |
parent | 55c9f8bd4eb1f8aafab4b3957eff63b0671b5d4b (diff) | |
download | rpmdrake-8b96f8d0ca7cef761e48a54ba331ffc91bf8b094.tar rpmdrake-8b96f8d0ca7cef761e48a54ba331ffc91bf8b094.tar.gz rpmdrake-8b96f8d0ca7cef761e48a54ba331ffc91bf8b094.tar.bz2 rpmdrake-8b96f8d0ca7cef761e48a54ba331ffc91bf8b094.tar.xz rpmdrake-8b96f8d0ca7cef761e48a54ba331ffc91bf8b094.zip |
remove unused progress_msg
-rw-r--r-- | rpmdrake.pm | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/rpmdrake.pm b/rpmdrake.pm index fc7f64b2..f3102bad 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -105,21 +105,6 @@ sub wait_msg { } sub remove_wait_msg { $_[0]->destroy } -sub progress_msg { - my ($msg, $max) = @_; - my $mainw = my_gtk->new('rpmdrake'); - my $label = new Gtk::Label($msg); - my $progressbar = gtkset_usize(new Gtk::ProgressBar, 400, 0); - gtkadd($mainw->{window}, gtkpack(gtkadd(create_vbox(), $label, $progressbar))); - $mainw->{rwindow}->set_position('center'); - $mainw->sync; - my $progress_val; my $progress_callback = sub { - $progressbar->update($max == -1 ? $_[0] : $progress_val++/$max); #/); - $mainw->flush; - }; - ($mainw, $progress_callback); -} - sub but { " $_[0] " } sub slow_func($&) { |