X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-posix%2Fposix-tests.lisp;h=78f99ba58259d774e96f594250b3a7074c2ec28a;hb=cea2946076e0dac11eea1c95158e5e2326455dd8;hp=549910b84d4454e60baf50e9fb272cbfe25be042;hpb=faa1bdc63e953ad672a83fa20e5ff61cff92206f;p=sbcl.git

diff --git a/contrib/sb-posix/posix-tests.lisp b/contrib/sb-posix/posix-tests.lisp
index 549910b..78f99ba 100644
--- a/contrib/sb-posix/posix-tests.lisp
+++ b/contrib/sb-posix/posix-tests.lisp
@@ -508,8 +508,7 @@
   nil)
 
 (deftest readdir.1
-  (let ((dir (sb-posix:opendir "/"))
-        (sb-alien::*default-c-string-external-format* :latin-1))
+  (let ((dir (sb-posix:opendir "/")))
     (unwind-protect
        (block dir-loop
          (loop for dirent = (sb-posix:readdir dir)