MBonaldo/hfs2
1
0
Fork 0
mirror of https://github.com/rejetto/hfs2.git synced 2025-12-19 10:03:56 +01:00
Code Issues Packages Projects Releases Wiki Activity

fix: log > ban ip address, not working with AM/PM time locale

Browse Source
This commit is contained in:
Massimo Melina 2020-05-30 17:28:43 +02:00
parent df5fa09ba9
commit 8be3ff6331
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
main.pas
View File

@ -4174,11 +4174,11 @@ logBox.SelAttributes.name:=logFontName;
if logFontSize > 0 then
logBox.SelAttributes.size:=logFontSize;
logBox.SelAttributes.Color:=clRed;
logBox.SelText:=ts+' ';
logBox.SelText:=ts+' ';
if addr > '' then
begin
logBox.SelAttributes.Color:=ADDRESS_COLOR;
logBox.SelText:=addr+' ';
logBox.SelText:=addr+' ';
end;
logBox.SelAttributes.color:=clr;
logBox.SelText:=first+CRLF;
@ -11258,7 +11258,7 @@ if pt.x < 0 then
if pt.y >= logbox.lines.count then
exit;
s:=logbox.lines[pt.y];
s:=reGet(s, '^\S+ +(\S+@)?(\S+):\d+ ', 2);
s:=reGet(s, '.+ (\S+@)?(\S+):\d+ ', 2);
if checkAddressSyntax(s,FALSE) then
result:=s;
end; // ipPointedInLog