From 396a9451d4fde4e7af181cde00e13cbbf1536925 Mon Sep 17 00:00:00 2001 From: Rodion Goritskov Date: Wed, 18 Feb 2026 23:03:28 +0100 Subject: [PATCH] services: Add configuration action to miniflux-service-type. * gnu/services/web.scm (miniflux-shepherd-service): Add configuration action. * gnu/tests/web.scm (run-miniflux-test): Add configuration action check. Change-Id: I515653070cc0c39fcbe31fef19d8745a1a8d47cb Signed-off-by: Sharlatan Hellseher --- gnu/services/web.scm | 5 ++++- gnu/tests/web.scm | 6 ++++++ 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/gnu/services/web.scm b/gnu/services/web.scm index 4ba2a2268d8..3354b3295b8 100644 --- a/gnu/services/web.scm +++ b/gnu/services/web.scm @@ -2460,7 +2460,10 @@ Use absolute path like @code{\"/var/run/miniflux/miniflux.sock\"} for a Unix soc "-config-file" #$config-file) #:log-file #$log-file)) - (stop #~(make-kill-destructor))))))) + (stop #~(make-kill-destructor)) + (actions + (list + (shepherd-configuration-action config-file)))))))) (define (miniflux-accounts config) (match-record config diff --git a/gnu/tests/web.scm b/gnu/tests/web.scm index 4f07eb967a8..5c8905f62b8 100644 --- a/gnu/tests/web.scm +++ b/gnu/tests/web.scm @@ -1016,6 +1016,12 @@ HTTP-PORT." #:times 10 #:delay 2))) + (test-assert "Miniflux configuration action returns an existing file path" + (marionette-eval '(with-shepherd-action 'miniflux ('configuration) + results + (file-exists? (car results))) + marionette)) + (test-end))))) (gexp->derivation (string-append name "-test") test))