From d43983e986df3ec87561685ba84c9dd4b08da620 Mon Sep 17 00:00:00 2001
From: Massimo Melina <a@rejetto.com>
Date: Mon, 29 Jun 2020 00:03:38 +0200
Subject: [PATCH] apply 1 minute timeout to file listing

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

diff --git a/main.pas b/main.pas
index d98a6aa..17c75c7 100644
--- a/main.pas
+++ b/main.pas
@@ -1,4 +1,4 @@
-{
+{
 Copyright (C) 2002-2020  Massimo Melina (www.rejetto.com)
 
 This file is part of HFS ~ HTTP File Server.
@@ -1383,6 +1383,7 @@   TfileListing = class
 constructor TfileListing.create();
 begin
 dir:=NIL;
+timeout:=Now()+1/MINUTES;
 end; // create
 
 destructor TfileListing.destroy;
@@ -5039,7 +5040,6 @@ procedure Tmainfrm.httpEvent(event:ThttpEvent; conn:ThttpConn);
     listing:=TfileListing.create();
     try
       listing.ignoreConnFilter:=ignoreConnFilters;
-      listing.timeout:= now()+1/MINUTES;
       listing.fromFolder( f, data, shouldRecur(data));
       fIsTemp:=f.isTemp();
       ofs:=length(f.resource)-length(f.name)+1;