From 4f0acd4aaa3d22320087539e297a4a18f1802164 Mon Sep 17 00:00:00 2001 From: freesource Date: Mon, 3 Dec 2001 18:44:41 +0000 Subject: [PATCH] Now global hashes are always cleared when a new check is ran, this makes more sense and avoids subtle errors. --- BootRoot/Yard.pm | 12 ++++++++---- 1 file changed, 8 insertions(+), 4 deletions(-) diff --git a/BootRoot/Yard.pm b/BootRoot/Yard.pm index b05ffb6..395e3bc 100644 --- a/BootRoot/Yard.pm +++ b/BootRoot/Yard.pm @@ -168,9 +168,11 @@ sub read_contents_file { my $fs_type = (split(/\s/,$main::makefs))[0]; # If the template changes it is time to clear all the values. - # Delete devices table. - if ( ($contents_file_tmp && $contents_file_tmp ne $contents_file) or - $fs_type eq "genext2fs" ) { + # Delete devices table. Actually, for fail safe operation, + # always clear the values when a check is done, this avoids + # spurious errors. + #if ( ($contents_file_tmp && $contents_file_tmp ne $contents_file) or + # $fs_type eq "genext2fs" ) { undef %Included; undef %replaced_by; undef %links_to; @@ -180,9 +182,11 @@ sub read_contents_file { undef %lib_needed_by; undef @Libs; undef %pam_repeats; - } + undef %user_defined_link; + #} $contents_file_tmp = $contents_file; + kernel_version_check($kernel, $kernel_version_choice); # Open DEVICE_TABLE