seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2025-07-05 16:25:19 +00:00
Code Issues Packages Projects Releases Wiki Activity

services: miniflux: Support proxy.

Browse Source 
* rosenthal/services/child-error.scm (miniflux-configuration)[proxy-url]: New
field.
(miniflux-shepherd-service): Fix miniflux path.
Adjust accordingly.
This commit is contained in:
Hilton Chain 2024-10-02 20:41:04 +08:00
parent f42f8e258b
commit 1d40787105
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
1 changed files with 14 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
rosenthal/services/child-error.scm
View File

@ -246,6 +246,8 @@ headers. This can expose sensitive information in your logs.")
;;
(define-maybe string)
(define-configuration miniflux-configuration
(miniflux
(file-like miniflux)
@ -253,6 +255,9 @@ headers. This can expose sensitive information in your logs.")
(log-file
(string "/var/log/miniflux.log")
"Where the logs go.")
(proxy-url
maybe-string
"Proxy URL to use.")
(options
(alist '())
"Association list of miniflux configuration options.")
@ -273,7 +278,7 @@ headers. This can expose sensitive information in your logs.")
(define miniflux-shepherd-service
(match-record-lambda <miniflux-configuration>
(miniflux log-file options)
(miniflux log-file proxy-url options)
(let ((config-file (mixed-text-file
"miniflux.conf"
(apply string-append
@ -286,10 +291,16 @@ headers. This can expose sensitive information in your logs.")
(provision '(miniflux))
(requirement '(postgres user-processes))
(start #~(make-forkexec-constructor
(list #$miniflux "-config-file" #$config-file)
(list #$(file-append miniflux "/bin/miniflux")
"-config-file" #$config-file)
#:user "miniflux"
#:group "nogroup"
#:log-file #$log-file))
#:log-file #$log-file
#:environment-variables
'#$(if (maybe-value-set? proxy-url)
(list (string-append "HTTP_PROXY=" proxy-url)
(string-append "HTTPS_PROXY=" proxy-url))
'())))
(stop #~(make-kill-destructor)))))))
(define miniflux-service-type