Index: /trunk/source/level-1/linux-files.lisp
===================================================================
--- /trunk/source/level-1/linux-files.lisp	(revision 14321)
+++ /trunk/source/level-1/linux-files.lisp	(revision 14322)
@@ -865,5 +865,5 @@
 
 (defun %delete-file (name)
-  (with-cstrs ((n name))
+  (with-filename-cstrs ((n name))
     (int-errno-call (#+windows-target #__unlink #-windows-target #_unlink n))))
 
Index: /trunk/source/lib/pathnames.lisp
===================================================================
--- /trunk/source/lib/pathnames.lisp	(revision 14321)
+++ /trunk/source/lib/pathnames.lisp	(revision 14322)
@@ -80,6 +80,6 @@
 
 (defun unix-rename (old-name new-name)
-  (with-cstrs ((old old-name)
-               (new new-name))
+  (with-filename-cstrs ((old old-name)
+			(new new-name))
     #+windows-target
     (#__unlink new)