|
@@ -974,7 +974,7 @@ bool __fastcall TCustomCommand::FindPattern(const UnicodeString & Command,
|
|
|
int Len;
|
|
|
wchar_t APatternCmd;
|
|
|
GetToken(Command, Index, Len, APatternCmd);
|
|
|
- if (((PatternCmd != L'!') && (PatternCmd == APatternCmd)) ||
|
|
|
+ if (((PatternCmd != L'!') && (tolower(PatternCmd) == tolower(APatternCmd))) ||
|
|
|
((PatternCmd == L'!') && (Len == 1) && (APatternCmd != TEXT_TOKEN)))
|
|
|
{
|
|
|
Result = true;
|
|
@@ -1170,17 +1170,17 @@ TFileCustomCommand::TFileCustomCommand(const TCustomCommandData & Data,
|
|
|
int __fastcall TFileCustomCommand::PatternLen(const UnicodeString & Command, int Index)
|
|
|
{
|
|
|
int Len;
|
|
|
- wchar_t PatternCmd = (Index < Command.Length()) ? Command[Index + 1] : L'\0';
|
|
|
+ wchar_t PatternCmd = (Index < Command.Length()) ? tolower(Command[Index + 1]) : L'\0';
|
|
|
switch (PatternCmd)
|
|
|
{
|
|
|
- case L'S':
|
|
|
+ case L's':
|
|
|
case L'@':
|
|
|
- case L'U':
|
|
|
- case L'P':
|
|
|
+ case L'u':
|
|
|
+ case L'p':
|
|
|
case L'#':
|
|
|
case L'/':
|
|
|
case L'&':
|
|
|
- case L'N':
|
|
|
+ case L'n':
|
|
|
Len = 2;
|
|
|
break;
|
|
|
|