07/14: guix: maven: Use a temporary file to fix pom files.

[guix-commits]

roptat pushed a commit to branch master
in repository guix.

commit cc09453862d1604bbbb4a2a9487e395d9a459708
Author: Julien Lepiller <julien@lepiller.eu>
AuthorDate: Tue Jun 1 00:44:20 2021 +0200

    guix: maven: Use a temporary file to fix pom files.
    
    * guix/build/maven/pom.scm (fix-pom-dependencies): Actually use the
    temporary file that was created.
---
 guix/build/maven/pom.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/guix/build/maven/pom.scm b/guix/build/maven/pom.scm
index 9c0669c..9e35e47 100644
--- a/guix/build/maven/pom.scm
+++ b/guix/build/maven/pom.scm
@@ -508,6 +508,7 @@ Returns nothing, but overrides the @var{pom-file} as a 
side-effect."
               (throw 'no-such-input group artifact))))))
 
   (let ((tmpfile (string-append pom-file ".tmp")))
-    (with-output-to-file pom-file
+    (with-output-to-file tmpfile
       (lambda _
-        (sxml->xml (fix-maven-xml (fix-pom pom)))))))
+        (sxml->xml (fix-maven-xml (fix-pom pom)))))
+    (rename-file tmpfile pom-file)))