diff options
-rwxr-xr-x | userdrake2 | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -27,8 +27,7 @@ use common; use any; use interactive; use ugtk2 qw(:all); -#use USER; - +use USER; my $us = {} ;#my $us = USER::ADMIN->new; #$ent = $us->lookup_user_name("daouda"); @@ -37,6 +36,9 @@ my $us = {} ;#my $us = USER::ADMIN->new; $us->{VERSION} = 0.91; my $pixdir = '/usr/share/userdrake/pixmaps/'; +my $h = USER::ADMIN->new; +$h->start(); + my $in = interactive->vnew('su', 'default'); sub HelpSystem { system("drakhelp Drakxtools-Guide.html/userdrake.html &") }; |