[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: services: nginx: Use mime.types.
From: |
julien lepiller |
Subject: |
01/01: services: nginx: Use mime.types. |
Date: |
Tue, 18 Apr 2017 17:16:53 -0400 (EDT) |
roptat pushed a commit to branch master
in repository guix.
commit 54412ebfeb51de88eecde28ac69ace46b2d9e420
Author: Julien Lepiller <address@hidden>
Date: Mon Apr 17 23:06:04 2017 +0200
services: nginx: Use mime.types.
* gnu/service/web.scm (default-nginx-config): Add 'nginx' parameter
and honor it. Adjust callers.
---
gnu/services/web.scm | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/gnu/services/web.scm b/gnu/services/web.scm
index 11408d7..b7b2f67 100644
--- a/gnu/services/web.scm
+++ b/gnu/services/web.scm
@@ -180,7 +180,7 @@ of index files."
(nginx-upstream-configuration-servers upstream)))
" }\n"))
-(define (default-nginx-config log-directory run-directory server-list
upstream-list)
+(define (default-nginx-config nginx log-directory run-directory server-list
upstream-list)
(mixed-text-file "nginx.conf"
"user nginx nginx;\n"
"pid " run-directory "/pid;\n"
@@ -192,6 +192,7 @@ of index files."
" uwsgi_temp_path " run-directory "/uwsgi_temp;\n"
" scgi_temp_path " run-directory "/scgi_temp;\n"
" access_log " log-directory "/access.log;\n"
+ " include " nginx "/share/nginx/conf/mime.types;\n"
"\n"
(string-join
(filter (lambda (section) (not (null? section)))
@@ -235,7 +236,7 @@ of index files."
;; Check configuration file syntax.
(system* (string-append #$nginx "/sbin/nginx")
"-c" #$(or config-file
- (default-nginx-config log-directory
+ (default-nginx-config nginx log-directory
run-directory server-blocks upstream-blocks))
"-t")))))
@@ -250,7 +251,7 @@ of index files."
(zero?
(system* #$nginx-binary "-c"
#$(or config-file
- (default-nginx-config log-directory
+ (default-nginx-config nginx log-directory
run-directory server-blocks
upstream-blocks))
address@hidden))))))