ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-12 06:06:53 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Remove temporary directory created by nar.scm.

Browse source 
* tests/nar.scm ("write-file + restore-file with symlinks"): Add (rm-rf
  output).
This commit is contained in:
Ludovic Courtès 2013-04-12 18:40:22 +02:00
parent 9adb6934f4
commit 77ffd691bf
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tests/nar.scm
View file

@ -196,7 +196,8 @@ (define %test-dir
(cut restore-file <> output)) (cut restore-file <> output))
(file-tree-equal? input output)) (file-tree-equal? input output))
(lambda () (lambda ()
(false-if-exception (delete-file nar))))))) (false-if-exception (delete-file nar))
(false-if-exception (rm-rf output)))))))
(lambda () (lambda ()
(rmdir input))))) (rmdir input)))))