diff options
Diffstat (limited to '')
-rw-r--r-- | tests/test/add-and-save.scm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/tests/test/add-and-save.scm b/tests/test/add-and-save.scm index fb3277bb..efbfe09e 100644 --- a/tests/test/add-and-save.scm +++ b/tests/test/add-and-save.scm @@ -71,14 +71,12 @@ #2021-12-21T11:45:00) )) -;; TODO tmpnam is deprecated -(define directory (tmpnam)) +(define directory (mkdtemp (string-copy"/tmp/guile-test-XXXXXX"))) +(format #t "Using ~a~%" directory) (define event-object ((@ (oop goops) make) (@@ (vcomponent util instance methods) <events>))) -(mkdir directory) -(format #t "Using ~a~%" directory) (define calendar (vcalendar |