aboutsummaryrefslogtreecommitdiff
path: root/src/org/euandre/papo.scm
diff options
context:
space:
mode:
authorEuAndreh <eu@euandre.org>2025-05-03 06:45:32 -0300
committerEuAndreh <eu@euandre.org>2025-05-03 06:46:39 -0300
commit2764f4ce314814eb172bb8ca70e8fabfc07971d9 (patch)
treee7a3801062f7ed2b15dc3feb696eaad9dfac207d /src/org/euandre/papo.scm
parentpackages.scm: Comment out fail2ban-service-type (diff)
downloadpackages-2764f4ce314814eb172bb8ca70e8fabfc07971d9.tar.gz
packages-2764f4ce314814eb172bb8ca70e8fabfc07971d9.tar.xz
Update "mkwb", "euandre.org" and "papo.im"
Diffstat (limited to 'src/org/euandre/papo.scm')
-rw-r--r--src/org/euandre/papo.scm29
1 files changed, 19 insertions, 10 deletions
diff --git a/src/org/euandre/papo.scm b/src/org/euandre/papo.scm
index e10c1ef..db6bc0b 100644
--- a/src/org/euandre/papo.scm
+++ b/src/org/euandre/papo.scm
@@ -1,8 +1,10 @@
(define-module (org euandre papo)
#:use-module ((org euandre packages) #:prefix pkg:)
#:use-module ((org euandre queue) #:prefix q:)
+ #:use-module (guix gexp)
#:use-module (guix packages)
#:use-module (guix records)
+ #:use-module (guix utils)
#:export (<papod-configuration>
papod-configuration
make-papod-configuration
@@ -23,16 +25,23 @@
(define-public papo.im
- (package
- (inherit
- (pkg:pkg
- "papo.im"
- "05d41463b179b65c63997d7ce468232e5bf2689a"
- "0dgxl35ri9c049p66zxs442bgblxy7w3rdi65z01sx5mg5jir2q2"))
- (native-inputs
- (append
- (pkg:format-inputs (list pkg:mkwb))
- (pkg:normalize-inputs '(gnupg jq rsync))))))
+ (let ((pkg (pkg:pkg
+ "papo.im"
+ "be22c1406aa9cd4beeeb38ad81433c4ecf7b65ce"
+ "0biz39rzmh5wj6cx9gzsvq37ryrrajvhdf1s669cnnjvp94s3d6z")))
+ (package
+ (inherit pkg)
+ (native-inputs
+ (append
+ (pkg:format-inputs (list pkg:mkwb))
+ (pkg:normalize-inputs '(gnupg jq rsync po4a gettext ghostscript))))
+ (arguments
+ (substitute-keyword-arguments (package-arguments pkg)
+ ((#:phases phases)
+ #~(modify-phases #$phases
+ (add-before 'build 'sethome-ghostscript
+ (lambda _
+ (setenv "HOME" (getcwd)))))))))))
(define-public chat.papo.im
(package