From e757212b86d4c8e8aead8a0003dea015a26bf1f1 Mon Sep 17 00:00:00 2001 From: joost Date: Sat, 3 Jan 2009 22:36:09 +0000 Subject: [PATCH] * While reading in the configuration file, handle select-options case-insensitive, so that -Tlinux is correctly recognized git-svn-id: trunk@12496 - --- ide/fpswitch.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ide/fpswitch.pas b/ide/fpswitch.pas index 7fc3c34790..126ecaa961 100644 --- a/ide/fpswitch.pas +++ b/ide/fpswitch.pas @@ -896,7 +896,7 @@ function TSwitches.ReadItemsCfg(const s:string):boolean; { empty items are not equivalent to others !! } { but -dGDB didn't work because of this PM } CheckItem:=((P^.Param='') and ((S='') or (P^.typ in [ot_Boolean,ot_String]))) or - ((Length(P^.Param)>0) and (P^.Param=S) and + ((Length(P^.Param)>0) and (upcase(P^.Param)=upcase(S)) and not (P^.typ in [ot_Boolean,ot_String])) or ((Length(P^.Param)>0) and (P^.typ<>ot_Select) and (P^.Param=Copy(s,1,length(P^.Param))));