aboutsummaryrefslogtreecommitdiffstats
path: root/userdrake2
diff options
context:
space:
mode:
Diffstat (limited to 'userdrake2')
-rwxr-xr-xuserdrake240
1 files changed, 19 insertions, 21 deletions
diff --git a/userdrake2 b/userdrake2
index 8fc3c30..8c092f7 100755
--- a/userdrake2
+++ b/userdrake2
@@ -118,7 +118,7 @@ foreach (($tbedit, $tbdel, $checkedit, $checkdel)) { $_->set_sensitive(0) };
my $ctx = USER::ADMIN->new;
Refresh($sysfilter);
$nb->signal_connect('switch-page' => sub { NotebookSwitch() });
-GetEvent($usertree); GetEvent($grouptree);
+#GetEvent($usertree); GetEvent($grouptree);
$us->{wnd}{rwindow}->show_all;
Gtk2->main;
ugtk2->exit;
@@ -132,24 +132,6 @@ sub NotebookSwitch {
my $page = $nb->get_current_page();
$page and TreeUnselect($usertree) or TreeUnselect($grouptree);
}
-sub GetEvent {
- my $treev = shift;
- $treev->signal_connect(button_press_event => sub {
- my (undef, $event) = @_;
- my (undef, $iter) = $treev->get_selection->get_selected;
- return unless $iter;
- foreach (($tbedit, $tbdel, $checkedit, $checkdel)) { $_->set_sensitive(1) };
- Edit($iter) if $event->type eq '2button-press';
- $iter->free;
- });
- $treev->signal_connect(key_press_event => sub {
- my (undef, $event) = @_;
- my (undef, $iter) = $treev->get_selection->get_selected;
- return unless $iter;
- Edit($iter) if ($event->keyval == Gtk2::Gdk::Event::Key->Sym_Return);
- $iter->free;
- });
-}
sub Refresh_Users_Full {
my $filterusers = shift;
my $users = $ctx->UsersEnumerateFull();
@@ -366,7 +348,7 @@ sub AddGroup {
sub Delete {
my $page = $nb->get_current_page();
if ($page == 0) {
- print "page 0\n";
+ print "page 0";
} elsif ($page == 1) {
print "page 1\n";
}
@@ -376,9 +358,25 @@ sub Delete {
sub CreateTree {
my ($tree_model) = @_;
my $tree = Gtk2::TreeView->new_with_model($tree_model);
- $tree->get_selection->set_mode('browse');
+ $tree->get_selection->set_mode('single');
$tree->set_headers_visible(1);
$tree->set_rules_hint(1);
+ $tree->get_selection->signal_connect('changed' => sub { foreach (($tbedit, $tbdel, $checkedit, $checkdel)) { $_->set_sensitive(1);} });
+ $tree->signal_connect(button_press_event => sub {
+ my (undef, $event) = @_;
+ my (undef, $iter) = $tree->get_selection->get_selected;
+ return unless $iter;
+ foreach (($tbedit, $tbdel, $checkedit, $checkdel)) { $_->set_sensitive(1) };
+ Edit($iter) if $event->type eq '2button-press';
+ $iter->free;
+ });
+ $tree->signal_connect(key_press_event => sub {
+ my (undef, $event) = @_;
+ my (undef, $iter) = $tree->get_selection->get_selected;
+ return unless $iter;
+ Edit($iter) if ($event->keyval == Gtk2::Gdk::Event::Key->Sym_Return);
+ $iter->free;
+ });
$tree
}
sub gtkentry_hidepass {