Procházet zdrojové kódy

Check for preprocessor work case sensitively.

Martijn Laan před 5 roky
rodič
revize
e609ed6c7f
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      Projects/CompForm.pas

+ 1 - 1
Projects/CompForm.pas

@@ -2670,7 +2670,7 @@ procedure TCompileForm.UpdatePreprocMemos;
   procedure UpdatePreprocessorOutputMemo(const NewTabs, NewHints: TStringList);
   begin
     if FOptions.ShowPreprocessorOutput and (FPreprocessorOutput <> '') and
-       not SameText(TrimRight(FMainMemo.Lines.Text), FPreprocessorOutput) then begin
+       not SameStr(TrimRight(FMainMemo.Lines.Text), FPreprocessorOutput) then begin
       NewTabs.Add('Preprocessor Output');
       NewHints.Add('');
       FPreprocessorOutputMemo.ReadOnly := False;