diff options
| -rw-r--r-- | etc/guix/home.scm | 27 |
1 files changed, 1 insertions, 26 deletions
diff --git a/etc/guix/home.scm b/etc/guix/home.scm index 74a2e86..a539a76 100644 --- a/etc/guix/home.scm +++ b/etc/guix/home.scm @@ -113,23 +113,6 @@ ANSI Common Lisp standard."#) (license licenses:public-domain))) -(define msmtp-non-hardcoded - (package - (inherit msmtp) - (name "msmtp-non-hardcoded") - (arguments - (substitute-keyword-arguments (package-arguments msmtp) - ((#:phases phases) - #~(modify-phases #$phases - (add-after 'install-additional-files 'patch-hardcoded-paths - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out"))) - (substitute* (string-append out "/bin/msmtpq") - (("LOG=.*$") "LOG=\"$XDG_LOG_HOME\"/msmtpq.log\n") - (("^Q=.*$") "Q=\"$XDG_DATA_HOME\"/msmtp/queue\n") - (("^MSMTPQ_Q=.*$") "MSMTPQ_Q=\"$Q\"\n") - (("mkdir -m 0700 \"\\$Q\"") "mkdir -p -m 0700 \"$Q\""))))))))))) - (define gpodder-xdg (package (inherit gpodder) @@ -172,9 +155,6 @@ ,bin) ,opts))))))))) -(define isync-with-options - (with-options isync "mbsync" "--config=\"$XDG_CONFIG_HOME\"/mbsync/config")) - (define wget-with-options (with-options wget "wget" "--hsts-file=\"$XDG_STATE_HOME\"/wget-hsts")) @@ -511,10 +491,6 @@ httpd ;; for htpasswd weechat - alot - notmuch - w3m - afew qtox telescope imagemagick @@ -584,8 +560,7 @@ ungoogled-chromium icedove firefox)) - (list msmtp-non-hardcoded - ;; cmucl + (list ;; cmucl isync-with-options wget-with-options tmux-with-options |