summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xrhimport13
1 files changed, 9 insertions, 4 deletions
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()