X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Foctets.lisp;h=b86a1be23cd3cdd6c550fc4e7e32a95483048c2b;hb=992e6a70a0cae3f6d43bdbba18f77306fdf10662;hp=922e8eb697f725b57ff311706c351c2fbd37179e;hpb=dfaba352352815b4fbce2bfc281b4023d0de0553;p=sbcl.git

diff --git a/src/code/octets.lisp b/src/code/octets.lisp
index 922e8eb..b86a1be 100644
--- a/src/code/octets.lisp
+++ b/src/code/octets.lisp
@@ -649,7 +649,7 @@ one-past-the-end"
                                                   "LATIN-1")
                                               "KEYWORD")
                              #!+win32
-                               #!+sb-unicode (sb!win32::ansi-cp)
+                               #!+sb-unicode (sb!win32::ansi-codepage)
                                #!-sb-unicode :LATIN-1))
         (/show0 "cold-printing defaulted external-format:")
         #!+sb-show