Commit c13f0eee authored by Leigh B Stoller's avatar Leigh B Stoller
Browse files

Minor bug fix.

parent 69a1b81b
#!/usr/bin/perl -wT #!/usr/bin/perl -wT
# #
# Copyright (c) 2005-2014 University of Utah and the Flux Group. # Copyright (c) 2005-2015 University of Utah and the Flux Group.
# #
# {{{EMULAB-LICENSE # {{{EMULAB-LICENSE
# #
...@@ -1201,6 +1201,7 @@ sub GenEncryptedCert($) ...@@ -1201,6 +1201,7 @@ sub GenEncryptedCert($)
if ($query_result->numrows) { if ($query_result->numrows) {
($certpass) = $query_result->fetchrow_array(); ($certpass) = $query_result->fetchrow_array();
$certpass = escapeshellarg($certpass);
} }
else { else {
$certpass = substr(lc(emutil::GenHash()), 0, 12); $certpass = substr(lc(emutil::GenHash()), 0, 12);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment