me
/
guix
Archived
1
0
Fork 0
Code

gnu: mumi: Update to 0.0.3-1.350b2df. 

* gnu/packages/mail.scm (mumi): Update to 0.0.3-1.350b2df.
[arguments]: Use gexp; add phase 'install-picocss.
[native-inputs]: Add sassc and picocss sources.
Ricardo Wurmus 2022-12-21 00:29:33 +01:00
parent 25f702449c
commit b0943d3d2e
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 37 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
gnu/packages/mail.scm
View File

@ -4026,11 +4026,11 @@ It is a replacement for the @command{urlview} program.")
(license license:gpl2+))) (license license:gpl2+)))
(define-public mumi (define-public mumi
(let ((commit "4590e4822dda792f59f69b764824aa148d92dad0") (let ((commit "350b2dfbe22bea82ca2d5739d5aebbf9277fe7b7")
(revision "2")) (revision "1"))
(package (package
(name "mumi") (name "mumi")
(version (git-version "0.0.2" revision commit)) (version (git-version "0.0.3" revision commit))
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
@ -4039,33 +4039,38 @@ It is a replacement for the @command{urlview} program.")
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"16brl1dk92kppzvxx8q5hcqiywg863s4sz5wb64hz8a37xa4hkyr")))) "1i728cf5shsh0rcv38z244855s2jhifj91prq7c2zk99fsiadw50"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:modules ((guix build gnu-build-system) (list
#:modules '((guix build gnu-build-system)
((guix build guile-build-system) ((guix build guile-build-system)
#:select (target-guile-effective-version)) #:select (target-guile-effective-version))
(guix build utils)) (guix build utils))
#:imported-modules ((guix build guile-build-system) #:imported-modules `((guix build guile-build-system)
,@%gnu-build-system-modules) ,@%gnu-build-system-modules)
#:configure-flags '("--localstatedir=/var") #:configure-flags '(list "--localstatedir=/var")
#:phases #:phases
(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'install 'wrap-executable (add-after 'unpack 'install-picocss
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let ((pico (dirname (search-input-file inputs "/scss/pico.scss"))))
(bin (string-append out "/bin")) (mkdir-p "assets/pico/scss")
(version (target-guile-effective-version)) (copy-recursively pico "assets/pico/scss"))))
(scm (string-append out "/share/guile/site/" version)) (add-after 'install 'wrap-executable
(go (string-append out "/lib/guile/" version (lambda _
"/site-ccache"))) (let* ((bin (string-append #$output "/bin"))
(wrap-program (string-append bin "/mumi") (version (target-guile-effective-version))
`("GUILE_LOAD_PATH" ":" prefix (scm (string-append #$output "/share/guile/site/" version))
(,scm ,(getenv "GUILE_LOAD_PATH"))) (go (string-append #$output "/lib/guile/" version
`("GUILE_LOAD_COMPILED_PATH" ":" prefix "/site-ccache")))
(,go ,(getenv "GUILE_LOAD_COMPILED_PATH")))))))))) (wrap-program (string-append bin "/mumi")
`("GUILE_LOAD_PATH" ":" prefix
(,scm ,(getenv "GUILE_LOAD_PATH")))
`("GUILE_LOAD_COMPILED_PATH" ":" prefix
(,go ,(getenv "GUILE_LOAD_COMPILED_PATH"))))))))))
(inputs (inputs
(list guile-email-latest (list guile-email-latest
guile-fibers guile-fibers
@ -4079,7 +4084,16 @@ It is a replacement for the @command{urlview} program.")
guile-3.0 guile-3.0
mailutils)) mailutils))
(native-inputs (native-inputs
(list autoconf automake pkg-config)) (list autoconf automake pkg-config sassc
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/picocss/pico.git")
(commit "3052db4bd3439e236479dc0f98069f7d3b559486")))
(file-name (git-file-name "pico" "1.5.6"))
(sha256
(base32
"1gs1li48hqizx7lc4n2fdxn9i2v4vafkqpza7svvfpcamfz29jpi")))))
(home-page "https://git.elephly.net/software/mumi.git") (home-page "https://git.elephly.net/software/mumi.git")
(synopsis "Debbugs web interface") (synopsis "Debbugs web interface")
(description "Mumi is a Debbugs web interface.") (description "Mumi is a Debbugs web interface.")