diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-04-01 17:28:09 -0400 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2023-04-14 15:11:53 -0400 |
commit | b8b7622d2b02e3bbe56e5d52ae10517815cbfc23 (patch) | |
tree | c191499071807002fb51b853f20ab6907473551a /gnu | |
parent | 216312482f3e845b343829ec72ca94aec7ce488d (diff) | |
download | guix-b8b7622d2b02e3bbe56e5d52ae10517815cbfc23.tar.gz guix-b8b7622d2b02e3bbe56e5d52ae10517815cbfc23.zip |
gnu: imgui: Use gexp output variables.
* gnu/packages/toolkits.scm (imgui) [arguments]: Use gexp variables in install
phase.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/toolkits.scm | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/gnu/packages/toolkits.scm b/gnu/packages/toolkits.scm index 82b9490e62..a29ab01154 100644 --- a/gnu/packages/toolkits.scm +++ b/gnu/packages/toolkits.scm @@ -89,32 +89,33 @@ ;; fontconfig. (find-files "misc" "\\.cpp$")))) (replace 'install - (lambda* (#:key outputs #:allow-other-keys) - (let* ((out (assoc-ref outputs "out")) - (doc (assoc-ref outputs "doc")) - (header? (cut string-suffix? ".h" <>)) + (lambda _ + (let* ((header? (cut string-suffix? ".h" <>)) (imgui-headers (scandir "." header?)) (backend-headers (find-files "backends" "(glfw|opengl|sdl|vulkan).*\\.h$")) (misc-headers (find-files "misc" "\\.h$"))) - (install-file "libimgui.so" (string-append out "/lib")) + (install-file "libimgui.so" (string-append #$output "/lib")) ;; Install headers. (for-each (lambda (f) - (install-file f (string-append out "/include/imgui"))) + (install-file f (string-append #$output + "/include/imgui"))) imgui-headers) (for-each (lambda (f) (install-file f (string-append - out "/include/imgui/backends"))) + #$output + "/include/imgui/backends"))) backend-headers) (for-each (lambda (f) - (install-file f (string-append - out "/include/imgui/" (dirname f)))) + (install-file f (string-append #$output + "/include/imgui/" + (dirname f)))) misc-headers) ;; Install examples. - (copy-recursively - "examples" (string-append - doc "/share/imgui/examples")))))))) + (copy-recursively "examples" + (string-append #$output:doc + "/share/imgui/examples")))))))) (inputs (list fontconfig glfw mesa sdl2)) (home-page "https://github.com/ocornut/imgui") (synopsis "Immediate-mode C++ GUI library with minimal dependencies") |