From a2289156ce6634da3bb7e30fb301469b3d8c9f2d Mon Sep 17 00:00:00 2001 From: Jonathan Massot Date: Mon, 23 Feb 2026 15:25:59 +0800 Subject: [PATCH] support gzipped json files --- http_server/http_server.tbs | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/http_server/http_server.tbs b/http_server/http_server.tbs index a6ed4ef..116e939 100644 --- a/http_server/http_server.tbs +++ b/http_server/http_server.tbs @@ -460,6 +460,11 @@ sub http_server_proc_sock_data_sent() dim content_type as string(30)="text/html" select case extension case "json": + romfile.open(http_servers(index).request_file_name+".gz") + if romfile.size<>0 then + http_servers(index).request_file_name=http_servers(index).request_file_name+".gz" + content_encoding="Content-Encoding: gzip\r\n" + end if content_type="application/json" case "js": romfile.open(http_servers(index).request_file_name+".gz")