From 8b96f8d0ca7cef761e48a54ba331ffc91bf8b094 Mon Sep 17 00:00:00 2001
From: Guillaume Cottenceau <gc@mandriva.com>
Date: Fri, 2 Aug 2002 13:30:49 +0000
Subject: remove unused progress_msg

---
 rpmdrake.pm | 15 ---------------
 1 file changed, 15 deletions(-)

(limited to 'rpmdrake.pm')

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($&) {
-- 
cgit v1.2.1