diff options
author | Christian Pointner <equinox@helsinki.at> | 2010-06-08 12:47:27 (GMT) |
---|---|---|
committer | Christian Pointner <equinox@helsinki.at> | 2010-06-08 12:47:27 (GMT) |
commit | e48a008b44bd988288713ee60c96e459d7715738 (patch) | |
tree | 2e4ecd11360059297ef8586e32bdb1dce28737c4 | |
parent | 55510e4e191a6b28debc307185a2d70e1af91d28 (diff) |
open used carts window with corret title
git-svn-id: https://svn.helsinki.at/rhimport/trunk@69 7c65635b-ec39-4f67-a626-873dbafdd612
-rwxr-xr-x | rhimport | 13 |
1 files changed, 9 insertions, 4 deletions
@@ -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() |