encrypt module account cookies

fmd-project-team · Feb 12, 2020 · 5de3f59 · 5de3f59
1 parent 3baac73
commit 5de3f59
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/baseunits/WebsiteModules.pas b/baseunits/WebsiteModules.pas
@@ -988,6 +988,7 @@ procedure TWebsiteModules.LoadFromFile;
                 jd.JSONToObject(jo2,Account);
                 if Account.Username<>'' then Account.Username := DecryptString(Account.Username);
                 if Account.Password<>'' then Account.Password := DecryptString(Account.Password);
+                if Account.Cookies<>'' then Account.Cookies := DecryptString(Account.Cookies);
                 if Account.Status=asChecking then
                   Account.Status:=asUnknown;
               end;
@@ -1038,6 +1039,7 @@ procedure TWebsiteModules.SaveToFile;
           jo2:=js.ObjectToJSON(Account);
           jo2.Strings['Username']:=EncryptString(Account.Username);
           jo2.Strings['Password']:=EncryptString(Account.Password);
+          jo2.Strings['Cookies']:=EncryptString(Account.Cookies);
           jo.Add('Account',jo2);
         end;
       end;