Code

Fixed mkntpasswd to work.
authorcajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 1 Jul 2008 06:51:02 +0000 (06:51 +0000)
committercajus <cajus@594d385d-05f5-0310-b6e9-bd551577e9d8>
Tue, 1 Jul 2008 06:51:02 +0000 (06:51 +0000)
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@11491 594d385d-05f5-0310-b6e9-bd551577e9d8

gosa-core/bin/mkntpasswd

index 1749958298cb52c14c5c888e6cd8d9b9484606ec..b860f371d46701936ec38a8937aa0fb4c677d3bb 100755 (executable)
@@ -5,6 +5,6 @@ if [ $# -ne 1 ]; then
 fi
 
 # Render hash using perl
-perl -MCrypt::SmbHash -e "print join(q[:], ntlmgen $ARGV[0]), $/;"
+perl -MCrypt::SmbHash -e "ntlmgen \"\$ARGV[0]\", \$lm, \$nt; print \"\${lm}:\${nt}\n\";" "$1"
 
 exit 0