LINUX.ORG.RU

xemacs + понимание многих кодировок


0

0

Решил изучить XEmacs и как раз возникла следующая задача. Необходима работа с несколькими текстовыми файлами в различных русских кодировках ( ну например win1251, koi8-r и, для кучи, dos-овская ). Я планирую сделать так:

назначить несколько комбинаций клавиш для переключения на различные кодировки или, как вариант, одну комбинацию для циклического перебора всех кодировок.

Но тут возникает проблема.

ВОПРОС:

Подскажите, как в xemacs сменить кодировку текущего буфера? (я, честно говоря запутался в set-xxx-coding-system, непонятно какая из них что делает).

anonymous

У меня например это сделано так

(defun kk-find-file-cp1251 ()
  (interactive)
  (setq filename (read-file-name "Find file (cp1251): "))
  (set-file-coding-system-for-read 'cp1251)
  (find-file filename)
  (set-file-coding-system-for-read 'koi8-r))

(set-language-environment 'Cyrillic-KOI8)
(set-keyboard-coding-system 'koi8-r)
(setq default-buffer-file-coding-system 'koi8-r)
(prefer-coding-system 'koi8-r)
(define-coding-system-alias 'koi8-u 'koi8-r)
(put-charset-property 'cyrillic-iso8859-5 'preferred-coding-system 'koi8-r)
(set-input-mode nil nil 'We-will-use-eighth-bit-of-input-byte)
;;(setq selection-coding-system 'koi8-r) ;; does not work in Xemacs :((
(setq default-process-coding-system 'koi8-r)
(define-coding-system-alias 'cp1251 'windows-1251)

(global-set-key [(control f3)] 'kk-find-file-cp1251)
(global-set-key [f3] 'find-file)

удачи
С досовской кодировкой я не работаю, но в принципе там можно сделать по аналогии

human0id ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.