diff --git a/components/codetools/directorycacher.pas b/components/codetools/directorycacher.pas
index e1436ce9a7..95d1786fe3 100644
--- a/components/codetools/directorycacher.pas
+++ b/components/codetools/directorycacher.pas
@@ -1145,7 +1145,7 @@ function TCTDirectoryCache.FindUnitSourceInCompletePath(var AUnitName,
   function FindInFilenameLowUp(aFilename: string): string;
   begin
     if AnyCase then
-      Result:=Pool.FindDiskFilename(aFilename)
+      Result:=Pool.FindDiskFilename(aFilename,true)
     else begin
       Result:=aFilename;
       if FileExistsCached(Result) then exit;
diff --git a/components/codetools/examples/scanexamples/brokenfilenames.pas b/components/codetools/examples/scanexamples/brokenfilenames.pas
index b2e961f904..e2fda2a9d7 100644
--- a/components/codetools/examples/scanexamples/brokenfilenames.pas
+++ b/components/codetools/examples/scanexamples/brokenfilenames.pas
@@ -10,7 +10,7 @@ uses
   CustApp,
   biglettersunit, // must be fixed to BigLettersUnit
   biglettersunit in 'biglettersunit.pas',// -> BigLettersUnit.pas
-  biglettersunit in '..\ScanExamples\biglettersunit.pas',// -> ../scanexamples/BigLettersUnit
+  biglettersunit in '..\ScanExamples\biglettersunit.pas',// -> BigLettersUnit.pas
   NonExistingUnit1, NonExistingUnit2, SysUtils, NonExistingUnit3,
   {$IFDEF FPC}
   NonExistingUnit4
diff --git a/components/codetools/stdcodetools.pas b/components/codetools/stdcodetools.pas
index 00e9468bfb..c3e7e75744 100644
--- a/components/codetools/stdcodetools.pas
+++ b/components/codetools/stdcodetools.pas
@@ -1512,7 +1512,7 @@ const
           FromPos:=Node.StartPos;
           ToPos:=Node.EndPos;
           SourceChangeCache.Replace(gtNone,gtNone,FromPos,ToPos,s);
-          DebugLn('CheckUsesSection fix case Unit Name(',OldUnitName,'->',NewUnitName,') InFile(',OldInFilename,'->',NewInFilename,')');
+          DebugLn('TStandardCodeTool.FindMissingUnits.CheckUsesSection fix case Unit Name(',OldUnitName,'->',NewUnitName,') InFile(',OldInFilename,'->',NewInFilename,')');
         end;
       end else begin
         // unit not found