diff options
Diffstat (limited to 'guix/forge/klaus.scm')
| -rw-r--r-- | guix/forge/klaus.scm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/guix/forge/klaus.scm b/guix/forge/klaus.scm index 11cdbd5..157a974 100644 --- a/guix/forge/klaus.scm +++ b/guix/forge/klaus.scm @@ -34,6 +34,7 @@ nginx-location-configuration)) #:use-module (gnu system file-systems) #:use-module (guix deprecation) + #:use-module (guix gexp) #:use-module (guix packages) #:use-module (guix records) #:export (<klaus-configuration> @@ -44,6 +45,7 @@ klaus-configuration-socket klaus-configuration-repository-directory klaus-configuration-site-name + klaus-configuration-gunicorn-workers klaus-service-type klaus-gunicorn-app)) @@ -74,16 +76,19 @@ (repository-directory klaus-configuration-repository-directory (default "/srv/git")) (site-name klaus-configuration-site-name - (default #f))) + (default #f)) + (gunicorn-workers klaus-configuration-gunicorn-workers + (default #~(* 2 (total-processor-count))))) (define klaus-gunicorn-apps (match-record-lambda <klaus-configuration> - (python-klaus socket repository-directory site-name) + (python-klaus socket repository-directory site-name gunicorn-workers) (list (gunicorn-app (name "klaus") (package python-klaus) (wsgi-app-module "klaus.contrib.wsgi_autoreload") (sockets (list socket)) + (workers gunicorn-workers) (environment-variables (cons* (environment-variable (name "KLAUS_REPOS_ROOT") (value repository-directory)) |