BUG: When checking for upper-case modules do not use an upper-case .MOD extension.

This commit is contained in:
Brad King 2005-03-07 15:19:18 -05:00
parent 04bb427d1f
commit e75df695de

View File

@ -265,10 +265,12 @@ bool cmDependsFortran::CopyModule(const std::vector<std::string>& args)
// when the interface described in the module does not.
std::string mod = args[2];
mod += ".mod";
std::string stamp = args[3];
std::string mod_upper = cmSystemTools::UpperCase(mod.c_str());
std::string mod_lower = cmSystemTools::LowerCase(mod.c_str());
mod += ".mod";
mod_upper += ".mod";
mod_lower += ".mod";
if(cmSystemTools::FileExists(mod_upper.c_str()))
{