diff --git a/src/lisp/x.lisp b/src/lisp/x.lisp
index 68645d4..4f73c7d 100644
--- a/src/lisp/x.lisp
+++ b/src/lisp/x.lisp
@@ -151,7 +151,7 @@
 
 (defun path (name)
   "Needed because ECL uses base strings (not Unicode) for pathnames internally."
-  #+(or darwin linux)
+  #+unix
   (funcall (intern "QUTF8" :eql) name)
   #+win32
   (if (< (funcall (intern "%WINDOWS-VERSION" :eql)) #xa0)