소스 검색

Check for preprocessor work case sensitively.

Martijn Laan 5 년 전
부모
커밋
e609ed6c7f
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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;