.emacs-my
changeset 991 e8c74f4c5d9e
parent 990 29036d63bfe7
child 992 8523f94a9aa9
equal deleted inserted replaced
990:29036d63bfe7 991:e8c74f4c5d9e
   706   (setq default-file-name-coding-system 'cp1251)
   706   (setq default-file-name-coding-system 'cp1251)
   707   (setq default-process-coding-system '(cp1251 . cp1251))
   707   (setq default-process-coding-system '(cp1251 . cp1251))
   708   )
   708   )
   709  ((equal window-system 'x)
   709  ((equal window-system 'x)
   710   (prefer-coding-system 'utf-8-unix)
   710   (prefer-coding-system 'utf-8-unix)
   711   (setq selection-coding-system 'compound-text-with-extensions)
   711   (setq selection-coding-system nil)
   712   (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
   712   (setq x-select-request-type '(UTF8_STRING COMPOUND_TEXT TEXT STRING))
   713   (modify-coding-system-alist 'process ".*" 'utf-8-unix)
   713   (modify-coding-system-alist 'process ".*" 'utf-8-unix)
   714   )
   714   )
   715  ((eq system-type 'cygwin)
   715  ((eq system-type 'cygwin)
   716   (when (string-match "1251\\'" (getenv "LANG"))
   716   (when (string-match "1251\\'" (getenv "LANG"))