diff options
Diffstat (limited to 'guix')
| -rw-r--r-- | guix/forge/webhook.scm | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/guix/forge/webhook.scm b/guix/forge/webhook.scm index 0408e91..6f42808 100644 --- a/guix/forge/webhook.scm +++ b/guix/forge/webhook.scm @@ -32,11 +32,12 @@ #:use-module (guix git-download) #:use-module (guix build-system go) #:use-module ((guix licenses) #:prefix license:) + #:use-module (forge socket) #:export (webhook-service-type webhook-configuration webhook-configuration? webhook-configuration-package - webhook-configuration-port + webhook-configuration-socket webhook-configuration-log-directory webhook-configuration-hooks webhook-hook @@ -106,10 +107,10 @@ Everything else is the responsibility of the command's author.") webhook-configuration? (package webhook-configuration-package (default webhook)) - (ip webhook-configuration-ip - (default "127.0.0.1")) - (port webhook-configuration-port - (default 9000)) + (socket webhook-configuration-socket + (default (forge-ip-socket + (ip "127.0.0.1") + (port 9000)))) (log-directory webhook-configuration-log-directory (default "/var/log/webhook")) (hooks webhook-configuration-hooks @@ -166,8 +167,8 @@ Everything else is the responsibility of the command's author.") "/bin/webhook") "-hooks" #$(computed-file "hooks.json" (hooks-json-gexp config)) - "-ip" #$(webhook-configuration-ip config) - "-port" #$(number->string (webhook-configuration-port config)) + "-ip" #$(forge-ip-socket-ip (webhook-configuration-socket config)) + "-port" #$(number->string (forge-ip-socket-port (webhook-configuration-socket config))) "-logfile" #$(string-append (webhook-configuration-log-directory config) "/webhook.log")) #:mappings (list (file-system-mapping |