about summary refs log tree commit diff
path: root/guix/forge
diff options
context:
space:
mode:
Diffstat (limited to 'guix/forge')
-rw-r--r--guix/forge/gunicorn.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/guix/forge/gunicorn.scm b/guix/forge/gunicorn.scm
index 6fcbd72..de164e1 100644
--- a/guix/forge/gunicorn.scm
+++ b/guix/forge/gunicorn.scm
@@ -1,5 +1,5 @@
 ;;; guix-forge --- Guix software forge meta-service
-;;; Copyright © 2023–2025 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2023–2026 Arun Isaac <arunisaac@systemreboot.net>
 ;;; Copyright © 2024 Frederick M. Muriithi <fredmanglis@protonmail.com>
 ;;;
 ;;; This file is part of guix-forge.
@@ -151,7 +151,8 @@
             (provision (list (string->symbol name)))
             (requirement '(networking))
             (modules '((guix search-paths)
-                       (ice-9 match)))
+                       (ice-9 match)
+                       (ice-9 threads)))  ; for total-processor-count and others
             (start
              (let* ((app-manifest (packages->manifest
                                    ;; Using python-minimal in the
@@ -190,7 +191,7 @@
                               ;; network namespace. We can't do this yet due to
                               ;; https://yhetil.org/guix/m1ilknoi5r.fsf@fastmail.net/
                               #:namespaces (delq 'net %namespaces))
-                           "--workers" #$(number->string (gunicorn-app-workers app))
+                           "--workers" (number->string #$(gunicorn-app-workers app))
                            "--timeout" #$(number->string (gunicorn-app-timeout app))
                            (list #$@(append (append-map (lambda (socket)
                                                           (list "--bind"