RT2772 update: c_rehash was broken
Move the readdir() lines out of the if statement, so
that flist is available globally.
Reviewed-by: Tim Hudson <tjh@openssl.org>
(cherry picked from commit 6f46c3c3b0
)
This commit is contained in:
parent
3258429883
commit
478b3470ff
@ -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 $_) {
|
||||||
|
Loading…
Reference in New Issue
Block a user