--- contrib/swank-mit-scheme.scm	Fri Jan 21 04:15:05 2011
+++ contrib/swank-mit-scheme.scm	Sat Mar 17 04:35:34 2012
@@ -66,6 +66,8 @@
 
 ;;; package: (swank)
 
+(define :coding-system "utf-8-unix")
+
 (if (< (car (get-subsystem-version "Release"))
        '9)
     (error "This file requires MIT Scheme Release 9"))
@@ -260,6 +262,7 @@
     `(:pid ,(unix/current-pid)
       :package (:name ,(write-to-string (package/name p))
 		      :prompt ,(write-to-string (package/name p)))
+      :encoding (:coding-systems ("utf-8-unix"))
       :lisp-implementation 
       (:type "MIT Scheme" :version ,(get-subsystem-version-string "release"))
       )))