From 5983b78368f1033c52cc5e824115975ab0b31dff Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Sat, 17 Mar 2018 23:08:34 +0200 Subject: gnu: shaderc: Clean up package arguments. * gnu/packages/vulkan.scm (shaderc)[version]: Remove extra '-'. [arguments]: Remove extra 'mkdir-p' calls and refer to inputs directly. --- gnu/packages/vulkan.scm | 21 +++++++-------------- 1 file changed, 7 insertions(+), 14 deletions(-) diff --git a/gnu/packages/vulkan.scm b/gnu/packages/vulkan.scm index bd0fb9e1ce..12b1f93015 100644 --- a/gnu/packages/vulkan.scm +++ b/gnu/packages/vulkan.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2017, 2018 Rutger Helling ;;; Copyright © 2018 Tobias Geerinckx-Rice +;;; Copyright © 2018 Efraim Flashner ;;; ;;; This file is part of GNU Guix. ;;; @@ -212,7 +213,7 @@ and the ICD.") (revision "1")) (package (name "shaderc") - (version (git-version "0.0.0-" revision commit)) + (version (git-version "0.0.0" revision commit)) (source (origin (method git-fetch) @@ -254,22 +255,14 @@ and the ICD.") out))))) (add-after 'unpack 'unpack-sources (lambda* (#:key inputs #:allow-other-keys) - (let ((spirv-tools-source (assoc-ref %build-inputs - "spirv-tools-source")) - (spirv-headers-source (assoc-ref %build-inputs - "spirv-headers-source")) - (glslang-source (assoc-ref %build-inputs - "glslang-source"))) - (mkdir-p "third-party/spirv-tools") - (copy-recursively spirv-tools-source - "third_party/spirv-tools") - (mkdir-p "third-party/spirv-tools/external/spirv-headers") + (let ((spirv-tools-source (assoc-ref inputs "spirv-tools-source")) + (spirv-headers-source (assoc-ref inputs "spirv-headers-source")) + (glslang-source (assoc-ref inputs "glslang-source"))) + (copy-recursively spirv-tools-source "third_party/spirv-tools") (copy-recursively spirv-headers-source (string-append "third_party/spirv-tools" "/external/spirv-headers")) - (mkdir-p "third-party/glslang") - (copy-recursively glslang-source - "third_party/glslang") + (copy-recursively glslang-source "third_party/glslang") #t)))))) (inputs `(("python" ,python))) -- cgit v1.2.3