--- a/.emacs-my	Sat Mar 26 18:52:58 2011 +0200
+++ b/.emacs-my	Wed Mar 30 17:44:34 2011 +0300
@@ -271,7 +271,7 @@
 
 (setq read-quoted-char-radix 16)
 
-(when (>= emacs-major-version 22)
+(when (and (>= emacs-major-version 22) (not (eq system-type 'darwin)))
   (setq standard-display-table (make-display-table))
   (let ( (i ?\x80) hex hi low )
     (while (<= i ?\xff)
@@ -530,6 +530,9 @@
   (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
   (modify-coding-system-alist 'process ".*" 'utf-8-unix)
   )
+ ((eq system-type 'darwin)
+  nil
+  )
  (t
   (prefer-coding-system 'cp1251-dos)
   (prefer-coding-system 'utf-8-unix)