mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00
Code Activity

tests: Remove symlink only when it exists.

Browse source 
* test-suite/tests/filesys.test: Delete (test-symlink) only if it
  exists---i.e., not on Windows.
  Reported by Eli Zaretskii <eliz@gnu.org>.
This commit is contained in:
Ludovic Courtès 2013-06-16 16:54:12 +02:00
parent 09fb52b6c9
commit 9f7914d39a
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
test-suite/tests/filesys.test
View file

@ -222,4 +222,5 @@
(throw 'unresolved))))) (throw 'unresolved)))))
(delete-file (test-file)) (delete-file (test-file))
(delete-file (test-symlink)) (when (file-exists? (test-symlink))
(delete-file (test-symlink)))