In remove_at_jobs():

Don't print "Removing at jobs" if there are no jobs to remove.
Add a whitespace before "done." so the output looks better.

diff --git a/adduser/rmuser.perl b/adduser/rmuser.perl
index 08fb0fc59240f04e85ba69b867c0638b2f9a659f..7e0f90a7bd62b549c5c43f465485690d811400f4 100644 (file)
--- a/adduser/rmuser.perl
+++ b/adduser/rmuser.perl
@@ -533,10 +533,10 @@ sub remove_at_jobs {
     
     return 1 if ($user eq "");
     
-    print STDERR "Removing user's at jobs:";
     @at = invoke_atq($user);
     return 0 if ($#at == -1);
     
+    print STDERR "Removing user's at jobs:";
     print STDERR " @at:";
     $atrm = invoke_atrm($user, @at);
     if ($atrm ne "") {
@@ -544,7 +544,7 @@ sub remove_at_jobs {
        return 1;
     }
     
-    print STDERR "done.\n";
+    print STDERR " done.\n";
     return 0;
 }