Caqtdm check, warning cleanup

src/epics/util/feCodeGen.pl

@@ -1891,7 +1891,6 @@ close OUT;
 
 
 close OUTD;
-close WARNINGS;
 
 #// Write out the User Space Code Here (Just copy it, same code file for both)
 copy("./".$modelCodeKernFilepath, "./".$modelCodeUspFilepath) or die "copy failed: $! : ";
@@ -2292,9 +2291,12 @@ if ( system("adl2ui -h") == 0 )
 }
 else #No caQtDM installed skip
 {
-    print WARNINGS "caQtDM is not installed, skipping caQtDM screen generation.\n"
+    print WARNINGS "caqtdm is not installed, skipping caQtDM screen generation.\n";
 }
 
+close WARNINGS;
+
+
 #//	-  Print source file names into a file
 #
 open(OUT,">$modelEpicsCodeDir/sources.\L$sysname\E") || die "cannot open \"$modelEpicsCodeDir/sources.$sysname\" file for writing ";