You've already forked guix-tribes
Fix Tribes node update CLI and ACME routing
This commit is contained in:
@@ -12,7 +12,6 @@
|
||||
(use-modules (ice-9 format)
|
||||
(ice-9 ftw)
|
||||
(ice-9 match)
|
||||
(ice-9 posix)
|
||||
(srfi srfi-1))
|
||||
|
||||
(define channels-file "/etc/tribes/channels.sexp")
|
||||
@@ -20,10 +19,7 @@
|
||||
(define system-guix "/run/current-system/profile/bin/guix")
|
||||
|
||||
(define (home-directory)
|
||||
(let ((entry (getpwuid (getuid))))
|
||||
(if entry
|
||||
(passwd:dir entry)
|
||||
"/root")))
|
||||
(or (getenv "HOME") "/root"))
|
||||
|
||||
(define (pulled-guix)
|
||||
(string-append (home-directory) "/.config/guix/current/bin/guix"))
|
||||
@@ -42,7 +38,7 @@
|
||||
(format port " os update Pull channels and reconfigure the OS.~%"))
|
||||
|
||||
(define (require-root)
|
||||
(unless (zero? (getuid))
|
||||
(unless (string=? (or (getenv "USER") "") "root")
|
||||
(format (current-error-port)
|
||||
"tribes os update must run as root.~%")
|
||||
(exit 1)))
|
||||
|
||||
@@ -113,6 +113,7 @@
|
||||
"}\n\n"
|
||||
"sub vcl_recv {\n"
|
||||
" if (req.url ~ \"^/\\\\.well-known/acme-challenge/\") {\n"
|
||||
" set req.backend_hint = acme;\n"
|
||||
" return (pass);\n"
|
||||
" }\n\n"
|
||||
" return (synth(750));\n"
|
||||
|
||||
Reference in New Issue
Block a user