generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Use default value for $dir if it is empty.

Browse Source
This commit is contained in:
Dr. Stephen Henson 2008-02-25 13:14:06 +00:00
parent d9e427f09c
commit a9e96d724d
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
crypto/x86_64cpuid.pl
View File

@ -100,6 +100,7 @@ OPENSSL_wipe_cpu:
___ ___
$0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1; $0 =~ m/(.*[\/\\])[^\/\\]+$/; $dir=$1;
$dir = "." if $dir eq "";
open STDOUT,"| $^X $dir/perlasm/x86_64-xlate.pl $output"; open STDOUT,"| $^X $dir/perlasm/x86_64-xlate.pl $output";
print<<___; print<<___;