From e48a008b44bd988288713ee60c96e459d7715738 Mon Sep 17 00:00:00 2001 From: Christian Pointner Date: Tue, 8 Jun 2010 12:47:27 +0000 Subject: open used carts window with corret title git-svn-id: https://svn.helsinki.at/rhimport/trunk@69 7c65635b-ec39-4f67-a626-873dbafdd612 diff --git a/rhimport b/rhimport index 20a814f..b3f0c20 100755 --- a/rhimport +++ b/rhimport @@ -337,10 +337,15 @@ sub show_used_carts_gui() $l_status->set_label("Carts: $low_cart - $high_cart"); } -# my $usedcartswin = $guixml->get_widget('usedcartswin'); -# $usedcartswin or die "can't find Widget"; -# $usedcartswin->resize(640,480); -# $usedcartswin->show; + my $usedcartswin = Gtk2::Window->new(); + $usedcartswin or die "can't open new window"; + $usedcartswin->resize(640,480); + if($low_cart eq $high_cart) { + $usedcartswin->set_title("Cart: $low_cart"); + } else { + $usedcartswin->set_title("Carts: $low_cart - $high_cart"); + } + $usedcartswin->show; } sub clear_status_gui() -- cgit v0.10.2