Как называеться cp1251 в GNU Emacs?[Вимщикам не лезть]

Не знаю, что там в списке, т.к. в лом его просматривать, но cp1251 проканывает.

как нет в списке всё есть , полистать вниз и всё видно , там каких тока нет кодировок

(codepage-setup 866)
(codepage-setup 1251)
(define-coding-system-alias 'w 'cp1251)
(define-coding-system-alias 'd 'cp866)
(define-coding-system-alias 'u 'koi8-r)

(defun My-select-coding ()
 (interactive)
 (let ((noconf (not (buffer-modified-p))))
   (set-buffer-file-coding-system
    (read-coding-system "Select coding system: "))
   (revert-buffer nil noconf t)))

(global-set-key "^Xe" (quote My-select-coding))

авторство не моё:)

Спасибо!