提交 6f46c3c3 编写于 作者: R Rich Salz

RT2772 update: c_rehash was broken

Move the readdir() lines out of the if statement, so
that flist is available globally.
Reviewed-by: NTim Hudson <tjh@openssl.org>
上级 cb4bb56b
...@@ -93,10 +93,10 @@ sub hash_dir { ...@@ -93,10 +93,10 @@ sub hash_dir {
my %hashlist; my %hashlist;
print "Doing $_[0]\n"; print "Doing $_[0]\n";
chdir $_[0]; chdir $_[0];
if ( $removelinks ) {
opendir(DIR, "."); opendir(DIR, ".");
my @flist = readdir(DIR); my @flist = readdir(DIR);
closedir DIR; closedir DIR;
if ( $removelinks ) {
# Delete any existing symbolic links # Delete any existing symbolic links
foreach (grep {/^[\da-f]+\.r{0,1}\d+$/} @flist) { foreach (grep {/^[\da-f]+\.r{0,1}\d+$/} @flist) {
if(-l $_) { if(-l $_) {
......
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册