tests: Remove temporary directory created by nar.scm.

* 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

View File

@ -196,7 +196,8 @@
(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)))))