From 28b1919ffd98f7b8deba80438811cf0dbfdc0e74 Mon Sep 17 00:00:00 2001
From: Massimo Melina <a@rejetto.com>
Date: Mon, 11 May 2020 16:00:14 +0200
Subject: [PATCH] fix: login with MD5

---
 main.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/main.pas b/main.pas
index f58eee0..57aed2f 100644
--- a/main.pas
+++ b/main.pas
@@ -1938,10 +1938,10 @@ result:=length(ips);
 end; // countIPs
 
 function strSHA256(s:string):string;
-begin result:=THashSHA2.GetHashString(s) end;
+begin result:=upperCase( THashSHA2.GetHashString(s) ) end;
 
 function strMD5(s:string):string;
-begin result:=THashMD5.GetHashString(s) end;
+begin result:=uppercase( THashMD5.GetHashString(s) ) end;
 
 function idx_img2ico(i:integer):integer;
 begin