tribes/guix
1
0
Fork 1
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-05-27 19:41:50 +02:00
Code Activity

home: services: Use %user-log-dir as the log directory for all services.

Browse Source 
* gnu/home/services/desktop.scm (home-dbus-shepherd-services): Log to
%user-log-dir.
* gnu/home/services/desktop.scm (home-unclutter-shepherd-services): Same.
* gnu/home/services/pm.scm (home-batsignal-shepherd-services): Same.
* gnu/home/services/shepherd.scm (launch-shepherd-gexp): Don't overwrite
default log-file.

Change-Id: I2742371cbddd1bf4d981efc41f3eae8f148336be
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Dariqq
2024-10-29 12:29:04 +00:00
committed by Ludovic Courtès
parent d5eab53a72
commit 53ef4bf537
3 changed files with 14 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files
gnu/home/services/shepherd.scm
+5 -13
View File
@@ -120,19 +120,11 @@ as shepherd package."
(or (getenv "XDG_RUNTIME_DIR")
(format #f "/run/user/~a" (getuid)))
"/shepherd/socket"))
(let* ((state-dir (or (getenv "XDG_STATE_HOME")
(format #f "~a/.local/state"
(getenv "HOME"))))
(log-dir (string-append state-dir "/log")))
;; TODO: Remove it, 0.9.2 creates it automatically?
((@ (guix build utils) mkdir-p) log-dir)
(system*
#$(file-append shepherd "/bin/shepherd")
"--logfile"
(string-append log-dir "/shepherd.log")
#$@(if silent? '("--silent") '())
"--config"
#$(home-shepherd-configuration-file config)))))
(system*
#$(file-append shepherd "/bin/shepherd")
#$@(if silent? '("--silent") '())
"--config"
#$(home-shepherd-configuration-file config))))
#~"")))
(define (reload-configuration-gexp config)