enhance filter area layout

1 files changed, 9 insertions, 4 deletions

diff --git a/userdrake b/userdrake
index 0d60d52..6184220 100755
--- a/userdrake
+++ b/userdrake
@@ -99,10 +99,14 @@ if (defined $buttorcheck{filter}) {
 }
 
 my $toolb = Gtk2::Toolbar->new;
-my $searchBox = Gtk2::HBox->new(0,5); my $filter;
-$searchBox->pack_end(my $fbut = Gtk2::Button->new(N("Apply filter")), 0, 0, 4);
-$searchBox->pack_end(gtksignal_connect($filter = Gtk2::Entry->new,
-				       key_press_event => sub { $_[1]->keyval == $Gtk2::Gdk::Keysyms{Return} and Refresh($sysfilter, $filter->get_text()) } ), 0, 0, 4);
+my $filter;
+my $searchBox = gtkpack_(Gtk2::HBox->new(0,5),
+                         1, Gtk2::Label->new(""),
+                         0, Gtk2::Label->new(N("Search:")),
+                         0, gtksignal_connect($filter = Gtk2::Entry->new,
+				       key_press_event => sub { $_[1]->keyval == $Gtk2::Gdk::Keysyms{Return} and Refresh($sysfilter, $filter->get_text()) } ),
+                         0, my $fbut = Gtk2::Button->new(N("Apply filter")),
+                        );
 gtkappend_page(my $nb = Gtk2::Notebook->new, gtkpack(create_scrolled_window($usertree)), gtkshow(Gtk2::Label->new(N("Users"))));
 #PO: list of users belonging to that group
 gtkappend_page($nb, gtkpack(create_scrolled_window($grouptree)), gtkshow(Gtk2::Label->new(N("Groups"))));
@@ -112,6 +116,7 @@ gtkadd($us->{wnd}{window},
 		0, $menu,
 		0, $toolb,
 		0, $searchBox,
+          0, Gtk2::HSeparator->new,
 		1, $nb ));
 my @ucolsize = (60, 45, 40, 120, 80, 120, 50, -1); my @gcolsize =(100, 80, 160, -1) ;
 each_index {