- splash screen

1 files changed, 21 insertions, 4 deletions

diff --git a/userdrake b/userdrake
index 5aac5a5..0c77473 100755
--- a/userdrake
+++ b/userdrake
@@ -42,11 +42,26 @@ my $pixdir = '/usr/share/userdrake/pixmaps/';
 
 my $in = interactive->vnew('su');
 
-my $wait = $in->wait_message(N("Please wait"), N("Loading User and Groups"));
-gtkflush();
-
 my $us = {} ;
 $us->{VERSION} = '0.92';
+
+my $window_splash = Gtk2::Window->new('popup');
+$window_splash->signal_connect(delete_event => \&quit_global);
+$window_splash->set_title(N("Userdrake") . $us->{VERSION});
+$window_splash->set_position('center_always');
+$window_splash->add(gtkadd(gtkset_shadow_type(Gtk2::Frame->new, 'etched_out'),
+                           gtkpack(Gtk2::VBox->new(0, 0),
+				   gtkcreate_img("$pixdir/about.png"),
+                                   Gtk2::Label->new(N("Loading Users and Groups... Please wait"))
+                                   )
+                           )
+                    );
+$window_splash->show_all;
+gtkflush();
+
+#my $wait = $in->wait_message(N("Please wait"), N("Loading User and Groups"));
+#gtkflush();
+
 my $error = 0;
 my $GetValue = -65533;
 my $stringsearch = '';
@@ -152,7 +167,9 @@ $fbut->signal_connect('clicked', sub { $stringsearch = $filter->get_text() ; Ref
 Refresh($sysfilter, $stringsearch);
 $nb->signal_connect('switch-page' => sub { NotebookSwitch() });
 $us->{wnd}{rwindow}->show_all;
-undef $wait;
+#undef $wait;
+$window_splash->destroy;
+undef $window_splash;
 gtkset_mousecursor_normal();
 Gtk2->main;
 ugtk2->exit;