fix: account redirection not working if loggin in from a forbidden fo…

…lder
rejetto · May 28, 2020 · ad33cbf · ad33cbf
1 parent c4ca0d2
commit ad33cbf
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/main.pas b/main.pas
@@ -5098,7 +5098,10 @@ procedure Tmainfrm.httpEvent(event:ThttpEvent; conn:ThttpConn);
       result:=TRUE;
       specialGrant:=TRUE;
       end;
-    if result then exit;
+    if result then
+      exit;
+    if f.isFolder() and sessionRedirect() then // forbidden folder, but we were asked to go elsewhere
+      exit;
     conn.reply.realm:=f.getShownRealm();
     runEventScript('unauthorized');
     getPage('login', data, f);