Double-check home dir

diff --git a/useradmin/batch_exec.cgi b/useradmin/batch_exec.cgi
index 410c2bb..d48f314 100755 (executable)
--- a/useradmin/batch_exec.cgi
+++ b/useradmin/batch_exec.cgi
@@ -390,7 +390,9 @@ foreach $line (split(/[\r\n]+/, $data)) {
                &made_changes();
 
                # Delete his home directory
-               if ($in{'delhome'} && $user->{'home'} !~ /^\/+$/) {
+               if ($in{'delhome'} &&
+                   $user->{'home'} &&
+                   $user->{'home'} !~ /^\/+$/) {
                        &delete_home_directory($user);
                        }