symbolic keys are back

1 files changed, 3 insertions, 2 deletions

diff --git a/userdrake b/userdrake
index 19c02af..8372893 100755
--- a/userdrake
+++ b/userdrake
@@ -33,6 +33,7 @@ use interactive;
 use POSIX qw(mktime ceil);
 use USER;
 use Devel::Peek;
+use Gtk2::Gdk::Keysyms;
 
 my $conffile = '/etc/sysconfig/userdrake';
 my $secfile = '/etc/sysconfig/msec';
@@ -100,7 +101,7 @@ 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 == 0xFF0D and Refresh($sysfilter, $filter->get_text()) } ), 0, 0, 4);
+				       key_press_event => sub { $_[1]->keyval == $Gtk2::Gdk::Keysyms{Return} and Refresh($sysfilter, $filter->get_text()) } ), 0, 0, 4);
 gtkappend_page(my $nb = Gtk2::Notebook->new, gtkpack(create_scrolled_window($usertree)), gtkshow(Gtk2::Label->new(N("Users"))));
 gtkappend_page($nb, gtkpack(create_scrolled_window($grouptree)), gtkshow(Gtk2::Label->new(N("Group Users"))));
 $nb->set_show_border(0);
@@ -453,7 +454,7 @@ sub CreateTree {
 			       my (undef, $event) = @_;
 			       my (undef, $iter) = $tree->get_selection->get_selected;
 			       return unless $iter;
-			       Edit() if ($event->keyval == 0xFF0D);
+			       Edit() if ($event->keyval == $Gtk2::Gdk::Keysyms{Return});
 			   });
     $tree
 }