From 8b2a9be465a5b8c8ecf796b3c3f9f14b673f1f66 Mon Sep 17 00:00:00 2001 From: Marius Bakke Date: Thu, 3 Nov 2022 20:50:49 +0100 Subject: build-system/clojure: Avoid usage of (guix build sycalls). * guix/build/clojure-build-system.scm (reset-class-timestamps): Use MKDTEMP from Guile core instead of MKDTEMP!. --- guix/build/clojure-build-system.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'guix/build/clojure-build-system.scm') diff --git a/guix/build/clojure-build-system.scm b/guix/build/clojure-build-system.scm index cacbefb386..2cb153b6db 100644 --- a/guix/build/clojure-build-system.scm +++ b/guix/build/clojure-build-system.scm @@ -22,7 +22,6 @@ (define-module (guix build clojure-build-system) ant-build)) #:use-module (guix build clojure-utils) #:use-module (guix build java-utils) - #:use-module (guix build syscalls) #:use-module (guix build utils) #:use-module (ice-9 match) #:use-module (ice-9 regex) @@ -129,7 +128,7 @@ (define (repack-archive jar) ;; Note: .class files need to be strictly newer than source files, ;; otherwise the Clojure compiler will recompile sources. (let* ((early-1980 315619200) ; 1980-01-02 UTC - (dir (mkdtemp! "jar-contents.XXXXXX")) + (dir (mkdtemp "jar-contents.XXXXXX")) (manifest (string-append dir "/META-INF/MANIFEST.MF"))) (with-directory-excursion dir (invoke "jar" "xf" jar)) -- cgit v1.2.3