me/guix
Archived
1
0
Fork 0
Code Activity

gnu: stackistry: Use G-Expressions.

Browse source 
* gnu/packages/astronomy.scm (stackistry): Update package style by using
G-Expressions. Apply indention.
[arguments]<#:tests?>: Use it instead of deleting check phase.
<#:phases>: Remove trailing #f from each lambda.

Change-Id: I30f3906719713f0d47dc2049564bc2691ba3cd5d
This commit is contained in:
Sharlatan Hellseher 2024-01-20 15:50:48 +00:00
parent 6431cf121d
commit f74a8e8ac0
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5
1 changed files with 39 additions and 40 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

25
gnu/packages/astronomy.scm
View file

@ -1227,39 +1227,38 @@ astronomical fields. SkyMaker is part of the
(base32 "0rz29v33n0x0k40hv3v79ym5ylch1v0pbph4i21809gz2al5p7dq"))))
(build-system gnu-build-system)
(arguments
`(#:make-flags
(list
#:tests? #f ; No test target
#:make-flags
#~(list
(string-append
"SKRY_INCLUDE_PATH=" (assoc-ref %build-inputs "libskry") "/include")
"SKRY_INCLUDE_PATH=" #$(this-package-input "libskry") "/include")
(string-append
"SKRY_LIB_PATH=-L" (assoc-ref %build-inputs "libskry") "/lib")
"SKRY_LIB_PATH=-L" #$(this-package-input "libskry") "/lib")
(string-append
"LIBAV_INCLUDE_PATH=" (assoc-ref %build-inputs "ffmpeg") "/include"))
"LIBAV_INCLUDE_PATH=" #$(this-package-input "ffmpeg") "/include"))
#:phases
(modify-phases %standard-phases
#~(modify-phases %standard-phases
;; no configure and tests are provided
(delete 'configure)
(delete 'check)
(add-after 'unpack 'fix-paths
(lambda* (#:key outputs #:allow-other-keys)
(lambda _
(substitute* "src/main.cpp"
(("\"\\.\\.\", \"lang\"")
"\"../share/stackistry\", \"lang\""))
(substitute* "src/utils.cpp"
(("\"\\.\\.\", \"icons\"")
"\"../share/stackistry\", \"icons\""))
#t))
"\"../share/stackistry\", \"icons\""))))
(replace 'install
;; The Makefile lacks an ‘install’ target.
(lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(lambda _
(let* ((out #$output)
(bin (string-append out "/bin"))
(icons (string-append out "/share/stackistry/icons"))
(lang (string-append out "/share/stackistry/lang")))
(copy-recursively "bin" bin)
(copy-recursively "icons" icons)
(copy-recursively "lang" lang))
#t)))))
(copy-recursively "lang" lang)))))))
(native-inputs
(list pkg-config))
(inputs