diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/guix/system.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/guix/system.scm b/src/guix/system.scm index 5ab88ec..717f721 100644 --- a/src/guix/system.scm +++ b/src/guix/system.scm @@ -5,6 +5,7 @@ ((org euandre queue) #:prefix queue:) (gnu) (guix build-system trivial) + (guix build utils) (guix packages)) (use-package-modules admin @@ -25,7 +26,9 @@ (define +working-dir+ - (canonicalize-path ".")) + (if (directory-exists? "/opt/deploy/current") + "/opt/deploy/current" + (canonicalize-path "."))) (define (str . rest) (apply string-append rest)) |