From e75df695de9b702fbbb15bd97d658dc8acdc4a48 Mon Sep 17 00:00:00 2001
From: Brad King <brad.king@kitware.com>
Date: Mon, 7 Mar 2005 15:19:18 -0500
Subject: [PATCH] BUG: When checking for upper-case modules do not use an
 upper-case .MOD extension.

---
 Source/cmDependsFortran.cxx | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/Source/cmDependsFortran.cxx b/Source/cmDependsFortran.cxx
index a13c740f6..eaae7bb68 100644
--- a/Source/cmDependsFortran.cxx
+++ b/Source/cmDependsFortran.cxx
@@ -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()))
     {