aboutsummaryrefslogtreecommitdiffstats
path: root/Lisp/moxie/compat
diff options
context:
space:
mode:
authorBrian Cully <bjc@kublai.com>2011-03-15 22:03:11 -0400
committerBrian Cully <github.20.shmit@spamgourmet.com>2011-03-15 22:03:11 -0400
commit9992988f581532a7db50b57594fc3e346398f9fa (patch)
tree1cd36a71bc2d42ba091467e8cf014e1dbec0f635 /Lisp/moxie/compat
parente78a860d2ef8f9995d07868fcfe60ceb15b6b40b (diff)
downloadmoxie-9992988f581532a7db50b57594fc3e346398f9fa.tar.gz
moxie-9992988f581532a7db50b57594fc3e346398f9fa.zip
Update for 10.7
Also set stream type to latin-1 in SBCL. This should become a setting.
Diffstat (limited to 'Lisp/moxie/compat')
-rw-r--r--Lisp/moxie/compat/compat-sbcl.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/Lisp/moxie/compat/compat-sbcl.lisp b/Lisp/moxie/compat/compat-sbcl.lisp
index bb43bc8..aff4581 100644
--- a/Lisp/moxie/compat/compat-sbcl.lisp
+++ b/Lisp/moxie/compat/compat-sbcl.lisp
@@ -21,7 +21,7 @@
:protocol :tcp)))
(sb-bsd-sockets:socket-connect socket (coerce-inet-address-designator host) port)
(let ((stream (sb-bsd-sockets:socket-make-stream socket
- :input t :output t :buffering buffering)))
+ :input t :output t :buffering buffering :external-format :latin-1)))
(setf (gethash stream *stream-to-socket*) socket)
stream)))
@@ -46,4 +46,4 @@
(sb-sys:remove-fd-handler it)))
(defun save-lisp-and-die (path)
- (sb-ext:save-lisp-and-die path)) \ No newline at end of file
+ (sb-ext:save-lisp-and-die path))