Compare commits

...

2 Commits

Author SHA1 Message Date
874ff44b76
Mahdollista Git-tietovarantojen kopiointi ssh:n yli 2025-09-23 12:06:18 +03:00
cb7973d6b2
Mahdollista tiedote.md-paketin kunnollinen riippuvuusmuokkaus
Käyttämällä (assoc-ref inputs ...) aiemman #$(this-package-input ...)
sijaan viittauksen ratkaiseminen siirtyy alemmalle tasolle ja
esimerkiksi (inherit tiedote.md) toimii kuten pitäisi.
2025-09-23 11:59:01 +03:00

View File

@ -11,6 +11,7 @@
#:use-module (gnu packages haskell-check) #:use-module (gnu packages haskell-check)
#:use-module (gnu packages haskell-web) #:use-module (gnu packages haskell-web)
#:use-module (gnu packages golang-web) #:use-module (gnu packages golang-web)
#:use-module (gnu packages ssh)
#:use-module (gnu packages version-control)) #:use-module (gnu packages version-control))
(define vcs-file? (define vcs-file?
@ -41,17 +42,19 @@
ghc-scotty ghc-scotty
ghc-exit-codes ghc-exit-codes
git git
openssh-sans-x
go-github-com-aymerick-douceur)) go-github-com-aymerick-douceur))
(arguments (arguments
(list (list
#:phases #:phases
#~(modify-phases %standard-phases #~(modify-phases %standard-phases
(add-after 'install 'wrap-binaries (add-after 'install 'wrap-binaries
(lambda _ (lambda* (#:key inputs #:allow-other-keys)
(wrap-program (wrap-program
(string-append #$output "/bin/tiedote.md") (string-append #$output "/bin/tiedote.md")
`("PATH" prefix (,(string-append #$(this-package-input "git") "/bin") `("PATH" prefix (,(string-append (assoc-ref inputs "git") "/bin")
,(string-append #$(this-package-input "go-github-com-aymerick-douceur") ,(string-append (assoc-ref inputs "openssh-sans-x") "/bin")
,(string-append (assoc-ref inputs "go-github-com-aymerick-douceur")
"/bin"))))))))) "/bin")))))))))
(home-page "https://git.olarinmaensamoojat.fi/OMS/tiedote.md") (home-page "https://git.olarinmaensamoojat.fi/OMS/tiedote.md")
(synopsis "Git- ja markdown-pohjainen masssasähköpostijärjestelmä OMS:lle") (synopsis "Git- ja markdown-pohjainen masssasähköpostijärjestelmä OMS:lle")