diff --git a/.guix/modules/tiedote-md-service.scm b/.guix/modules/tiedote-md-service.scm index 1323f78..81de2c7 100644 --- a/.guix/modules/tiedote-md-service.scm +++ b/.guix/modules/tiedote-md-service.scm @@ -101,8 +101,10 @@ the tiedote.md user on this system.") (receive-script (program-file "tiedote.md-receive" #~(apply execl #$receive-exec))) (forward-file (mixed-text-file "dot-forward" "|" receive-script))) - #~(symlink #$forward-file - (string-append #$state-directory "/.forward"))))) + #~(let ((.forward (string-append #$state-directory "/.forward"))) + (if (file-exists? .forward) + (delete-file .forward)) + (symlink #$forward-file .forward))))) (define tiedote.md-service-type (service-type