equal
deleted
inserted
replaced
273 # Read the package list files alongside the script itself |
273 # Read the package list files alongside the script itself |
274 |
274 |
275 # Extract the path location of the program and locate package list files |
275 # Extract the path location of the program and locate package list files |
276 my ($program_name,$program_path) = &File::Basename::fileparse($0); |
276 my ($program_name,$program_path) = &File::Basename::fileparse($0); |
277 |
277 |
278 foreach my $file ("sf_mcl_packages.txt", "sftools_mcl_packages.txt", "other_packages.txt") |
278 foreach my $file ("sf_oss_mcl_packages.txt", "sftools_oss_mcl_packages.txt", "other_packages.txt") |
279 { |
279 { |
280 if (! -e $program_path.$file) |
280 if (! -e $program_path.$file) |
281 { |
281 { |
282 print "Cannot find implied packagelist $program_path$file\n"; |
282 print "Cannot find implied packagelist $program_path$file\n"; |
283 next; |
283 next; |