Index: server/common/oursrc/accountadm/vhostadd
===================================================================
--- server/common/oursrc/accountadm/vhostadd	(revision 843)
+++ server/common/oursrc/accountadm/vhostadd	(revision 844)
@@ -20,10 +20,10 @@
 fi
 
-pw=$(getent passwd "$user")
+pw=$(perl -e '$, = ":"; print getpwnam($ARGV[0]);' -- "$user")
 if [ $? -ne 0 ]; then
     echo "User not found." >&2
     exit $?
 fi
-IFS=: read user x uid gid x home x <<< "$pw"
+IFS=: read user x uid gid x x x home x <<< "$pw"
 
 user_dn=$(ldapsearch -LLL -x -b ou=People,dc=scripts,dc=mit,dc=edu "(uid=$user)" dn | perl -0pe 's/\n //g; s/^dn: //')
