diff options
| author | Stefan Kangas | 2022-12-14 08:21:34 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2022-12-14 08:21:34 +0100 |
| commit | 3efe4df1d20b1b2d823613f0945a2d37b76004a9 (patch) | |
| tree | 154cfaa3a156e8f9b14bb941ce9775991cfeaa3e | |
| parent | 33e0a104649dd90e347701723fa52af52a8a57c7 (diff) | |
| download | emacs-3efe4df1d20b1b2d823613f0945a2d37b76004a9.tar.gz emacs-3efe4df1d20b1b2d823613f0945a2d37b76004a9.zip | |
Delete temp files after icalendar tests
* test/lisp/calendar/icalendar-tests.el
(icalendar-tests--get-error-string-for-export): Make sure we clean up
temporary files after test.
| -rw-r--r-- | test/lisp/calendar/icalendar-tests.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/lisp/calendar/icalendar-tests.el b/test/lisp/calendar/icalendar-tests.el index fa55eea95e2..baf4846c8f5 100644 --- a/test/lisp/calendar/icalendar-tests.el +++ b/test/lisp/calendar/icalendar-tests.el | |||
| @@ -63,7 +63,8 @@ | |||
| 63 | 63 | ||
| 64 | (defun icalendar-tests--get-error-string-for-export (diary-string) | 64 | (defun icalendar-tests--get-error-string-for-export (diary-string) |
| 65 | "Call icalendar-export for DIARY-STRING and return resulting error-string." | 65 | "Call icalendar-export for DIARY-STRING and return resulting error-string." |
| 66 | (let ((file (make-temp-file "export.ics"))) | 66 | (ert-with-temp-file file |
| 67 | :suffix "-export.ics" | ||
| 67 | (with-temp-buffer | 68 | (with-temp-buffer |
| 68 | (insert diary-string) | 69 | (insert diary-string) |
| 69 | (icalendar-export-region (point-min) (point-max) file)) | 70 | (icalendar-export-region (point-min) (point-max) file)) |