- added explanations

1 files changed, 8 insertions, 3 deletions

diff --git a/userdrake b/userdrake
index 0c77473..8bcbdc3 100755
--- a/userdrake
+++ b/userdrake
@@ -303,10 +303,12 @@ sub AddUser {
 									     $u{gid} = $gr->Gid($GetValue);
 									 } elsif ($groupchoice == 1) {
 									     # Put it in 'users' group
+									     explanations(N("Putting %s to 'users' group", $u{username}));
 									     $u{gid} = Add2UsersGroup($u{username});
 									 }
 								     } else { 
 									 #it's a new group: Add it
+									 explanations(N("Creating new group: %s", $newgroup));
 									 my $newgroup = $ctx->InitGroup($u{username},$is_system);
 									 $u{gid} = $newgroup->Gid($GetValue);
 									 $ctx->GroupAdd($newgroup);
@@ -316,6 +318,7 @@ sub AddUser {
 								 !$error and $u{gid} = Add2UsersGroup($u{username});
 							     }
 							     if(!$error) {
+								 explanations(N("Adding user : %s", $u{username}));
 								 $u{gecos} = $us->{o}->{fullname}->get_text(); $u{loginshell} = $us->{o}->{shells}->entry->get_text();
 								 $userEnt->Gecos($u{gecos}); $userEnt->LoginShell($u{loginshell}); $userEnt->Gid($u{gid});
 								 $userEnt->ShadowMin(-1); $userEnt->ShadowMax(99999);
@@ -413,6 +416,7 @@ sub AddGroup {
 								 } else { $groupEnt->Gid($g{gid}) }
 							     };
 							     if(!$error) {
+								 explanations(N("Adding group : %s ", $g{groupname}));
 								 $ctx->GroupAdd($groupEnt);
 								 Refresh($sysfilter, $stringsearch);
 							     }
@@ -437,9 +441,7 @@ sub UpdateOrDelUsersInGroup {
 	    my $members = $g->MemberName(1, 0);
 	    if (InArray($name, $members)) { 
 		eval { $g->MemberName($name, 2) };
-		printf("\nAbout to modify %s\n", $g->GroupName($GetValue));
 		eval { $ctx->GroupModify($g) };
-		printf("\nModified %s\n", $g->GroupName($GetValue));
 	    }
 	}
     } else {
@@ -484,6 +486,7 @@ sub Delete {
 				       my $r = $_->[1];
 				       gtksignal_connect(Gtk2::Button->new_from_stock($_->[0]), clicked => sub {
 							     if (!$r) {
+								 explanations(N("Removing user: %s", $username));
 								 $ctx->UserDel($userEnt);
 								 UpdateOrDelUsersInGroup($username, 1);
 								 #Let's check out the user's primary group
@@ -522,7 +525,9 @@ sub Delete {
 									 last GLOOP
 								     }
 								 }
-								 if (!$error) { $ctx->GroupDel($groupEnt); Refresh($sysfilter, $stringsearch) }
+								 if (!$error) { 
+								     explanations(N("Removing group: %s", $groupname));
+								     $ctx->GroupDel($groupEnt); Refresh($sysfilter, $stringsearch) }
 							     }
 							     !$error and Gtk2->main_quit; $error = 0; })
 				   } ([ 'gtk-cancel', 1 ], [ 'gtk-delete', 0 ])),