[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#49886] [PATCH v2] Add gitile and gitile service
From: |
Maxime Devos |
Subject: |
[bug#49886] [PATCH v2] Add gitile and gitile service |
Date: |
Mon, 30 Aug 2021 18:54:24 +0200 |
User-agent: |
Evolution 3.34.2 |
Julien Lepiller schreef op wo 25-08-2021 om 23:31 [+0200]:
> + (add-after 'install-bin 'wrap-program
> + (lambda* (#:key inputs outputs #:allow-other-keys)
> + ;; Wrap the 'cuirass' command to refer to the right modules.
I think you meant 'gitile' here.
> + (let* ((out (assoc-ref outputs "out"))
> + (commonmark (assoc-ref inputs "guile-commonmark"))
> + (git (assoc-ref inputs "guile-git"))
> + (bytes (assoc-ref inputs "guile-bytestructures"))
> + (fibers (assoc-ref inputs "guile-fibers"))
> + (gcrypt (assoc-ref inputs "guile-gcrypt"))
> + (syntax-highlight (assoc-ref inputs
> "guile-syntax-highlight"))
> + (deps (list out commonmark git bytes fibers gcrypt
> + syntax-highlight))
> + (guile (assoc-ref inputs "guile"))
> + (effective (read-line
> + (open-pipe* OPEN_READ
> + (string-append guile
> "/bin/guile")
> + "-c" "(display
> (effective-version))")))
You can use "target-guile-effective-version" from (guix build
guile-build-system)
here.
Greetings,
Maxime.
signature.asc
Description: This is a digitally signed message part