From 3b411fbfaf55c4e0b4f46d1d4a2f163ba58e6c8e Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Tue, 23 Nov 2004 15:01:40 +0000
Subject: [PATCH] MKSTEMP now accepts and returns pathnames

---
 src/c/unixfsys.d | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/c/unixfsys.d b/src/c/unixfsys.d
index 359b61ee3..18e9f9be5 100644
--- a/src/c/unixfsys.d
+++ b/src/c/unixfsys.d
@@ -760,7 +760,7 @@ si_mkstemp(cl_object template)
 	cl_index l;
 	int fd;
 
-	assert_type_string(template);
+	template = si_coerce_to_filename(template);
 	l = template->string.fillp;
 	output = cl_alloc_simple_string(l + 6);
 	memcpy(output->string.self, template->string.self, l);
@@ -774,5 +774,5 @@ si_mkstemp(cl_object template)
 	if (fd < 0)
 		@(return Cnil)
 	close(fd);
-	@(return output)
+	@(return cl_truename(output))
 }