diff --git a/useradmin/batch_exec.cgi b/useradmin/batch_exec.cgi
index 410c2bb32..d48f31456 100755
--- 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);
 			}