From d00b5394832654f6f16bcec68ee306a46219e5f9 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Thu, 24 Apr 2025 09:36:54 +0100
Subject: [PATCH] Increase the open file limit

---
 guix-data-service/web/server.scm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/guix-data-service/web/server.scm b/guix-data-service/web/server.scm
index 2fd26f5..6818258 100644
--- a/guix-data-service/web/server.scm
+++ b/guix-data-service/web/server.scm
@@ -101,6 +101,13 @@
 
   (%guix-data-service-metrics-registry registry)
 
+  (with-exception-handler
+      (lambda (exn)
+        (simple-format #t "failed increasing open file limit: ~A\n" exn))
+    (lambda ()
+      (setrlimit 'nofile 4096 4096))
+    #:unwind? #t)
+
   (let ((finished?         (make-condition))
         (priority-scheduler #f)
         (request-scheduler #f))