03/11: build-system/clojure: Avoid usage of (guix build sycalls).

[guix-commits]

mbakke pushed a commit to branch master
in repository guix.

commit 8b2a9be465a5b8c8ecf796b3c3f9f14b673f1f66
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Thu Nov 3 20:50:49 2022 +0100

    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(-)

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 @@
                           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 @@ and repack them.  This is necessary to ensure that archives 
are reproducible."
     ;; 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))