diff options
author | Ludovic Courtès <ludovic.courtes@inria.fr> | 2021-11-15 17:23:08 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2021-11-15 17:55:50 +0100 |
commit | 21332f3b8cb8f407a89cdfe7d0460a9947675872 (patch) | |
tree | 92614af234e86663e8b2fe76e534d37b05848635 /gnu | |
parent | 782e9975dc11e614fe38f9899806b968f9cd7d70 (diff) |
gnu: hpcguix-web: Update to 0.2.0.
* gnu/packages/web.scm (hpcguix-web): Update to 0.2.0.
[arguments]: In 'wrap-program' phase, add guile-zlib to DEPS.
[native-inputs]: Add GUILE.
[inputs]: Add GUILE-ZLIB, GUILE-COMMONMARK, and GUILE-JSON.
[propagated-inputs]: Remove. These were pointless.
* gnu/services/web.scm (<hpcguix-web-configuration>)[address, port]: New
fields.
* doc/guix.texi (Web Services): Document them.
* gnu/tests/web.scm (%hpcguix-web-os): Add 'address'.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/web.scm | 17 | ||||
-rw-r--r-- | gnu/services/web.scm | 10 | ||||
-rw-r--r-- | gnu/tests/web.scm | 5 |
3 files changed, 21 insertions, 11 deletions
diff --git a/gnu/packages/web.scm b/gnu/packages/web.scm index a4c47f92d8..9cdbc31459 100644 --- a/gnu/packages/web.scm +++ b/gnu/packages/web.scm @@ -7668,7 +7668,7 @@ compressed JSON header blocks. (define-public hpcguix-web (package (name "hpcguix-web") - (version "0.1.0") + (version "0.2.0") (source (origin (method git-fetch) (uri (git-reference @@ -7677,7 +7677,7 @@ compressed JSON header blocks. (file-name (git-file-name name version)) (sha256 (base32 - "02lz5k1hhkwfz3nr3lsd69icsz6n0q82z047d3svi09qpxw6y0cj")))) + "1l856d1vr63ns1sp9fm6v97p71mx00769k6lwzqzppsb9clksnwp")))) (build-system gnu-build-system) (arguments `(#:modules ((guix build gnu-build-system) @@ -7701,9 +7701,10 @@ compressed JSON header blocks. (git (assoc-ref inputs "guile-git")) (bs (assoc-ref inputs "guile-bytestructures")) (json (assoc-ref inputs "guile-json")) + (zlib (assoc-ref inputs "guile-zlib")) (guile-cm (assoc-ref inputs "guile-commonmark")) - (deps (list guile gcrypt git bs guile-cm guix json)) + (deps (list guile gcrypt git bs zlib guile-cm guix json)) (effective (read-line (open-pipe* OPEN_READ @@ -7728,15 +7729,15 @@ compressed JSON header blocks. `(("autoconf" ,autoconf) ("automake" ,automake) ("uglify-js" ,uglify-js) - ("pkg-config" ,pkg-config))) + ("pkg-config" ,pkg-config) + ("guile" ,@(assoc-ref (package-native-inputs guix) "guile")))) (inputs `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile")) ("guix" ,guix) - ("bash-minimal" ,bash-minimal))) ;for 'wrap-program' - (propagated-inputs - `(("guile" ,@(assoc-ref (package-native-inputs guix) "guile")) + ("guile-zlib" ,guile-zlib) ("guile-commonmark" ,guile-commonmark) - ("guile-json" ,guile-json-4))) + ("guile-json" ,guile-json-4) + ("bash-minimal" ,bash-minimal))) (home-page "https://github.com/UMCUGenetics/hpcguix-web") (synopsis "Web interface for cluster deployments of Guix") (description "Hpcguix-web provides a web interface to the list of packages diff --git a/gnu/services/web.scm b/gnu/services/web.scm index bb42eacf83..f1c3a2f75e 100644 --- a/gnu/services/web.scm +++ b/gnu/services/web.scm @@ -1110,7 +1110,9 @@ a webserver.") (package hpcguix-web-package (default hpcguix-web)) ;<package> ;; Specs is gexp of hpcguix-web configuration file - (specs hpcguix-web-configuration-specs)) + (specs hpcguix-web-configuration-specs) + (address hpcguix-web-configuration-address (default "127.0.0.1")) + (port hpcguix-web-configuration-port (default 5000))) (define %hpcguix-web-accounts (list (user-group @@ -1163,6 +1165,12 @@ a webserver.") (requirement '(networking)) (start #~(make-forkexec-constructor (list #$(file-append hpcguix-web "/bin/hpcguix-web") + (string-append "--listen=" + #$(hpcguix-web-configuration-address + config)) + "-p" + #$(number->string + (hpcguix-web-configuration-port config)) (string-append "--config=" #$(scheme-file "hpcguix-web.scm" specs))) #:user "hpcguix-web" diff --git a/gnu/tests/web.scm b/gnu/tests/web.scm index 518c9c1ff3..ccb2f53137 100644 --- a/gnu/tests/web.scm +++ b/gnu/tests/web.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2017, 2020 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2017, 2020-2021 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2017, 2019 Christopher Baines <mail@cbaines.net> ;;; Copyright © 2017, 2018 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2018 Pierre-Antoine Rouby <pierre-antoine.rouby@inria.fr> @@ -438,7 +438,8 @@ HTTP-PORT, along with php-fpm." (service dhcp-client-service-type) (service hpcguix-web-service-type (hpcguix-web-configuration - (specs %hpcguix-web-specs))))) + (specs %hpcguix-web-specs) + (address "0.0.0.0"))))) (define %test-hpcguix-web (system-test |