2

私は GNU Emacs 24.2.1 を Gnus v5.13 で使用しています (しかし、決して Emacs では機能しません)。

(setq 'mm-text-html-renderer 'lynx)
(setcdr (assoc 'lynx mm-text-html-renderer-alist)
        '(mm-inline-render-with-stdin
          nil "lynx" "-dump" "-force_html" "-stdin" "-display_charset=UTF-8"))

しかし、UTF-8 文字は正しく表示されません。たとえば、次のようなものが表示されます。

Es gibt \303\274ber 700 neue Top-Level-Domains.

次のコマンドで簡単に解決できます。

(toggle-read-only)
(recode-region (point-min) (point-max) 'utf-8 'utf-8)

しかし、Gnus に Lynx の出力を一般的に UTF-8 として解釈させることは可能でしょうか?

(この質問はここでも回答なしで尋ねられました: http://lists.gnu.org/archive/html/info-gnus-english/2010-06/msg00006.html )

4

1 に答える 1

0

私は自分で答えを見つけました.ここではUTF-8でGnusでLynxをアクティブにするための完全なコードです:

(require 'mm-view)
(setq mm-text-html-renderer 'lynx)
(setcdr (assoc 'lynx mm-text-html-renderer-alist)
        '(mm-inline-render-with-stdin
          nil "lynx" "-dump" "-force_html" "-stdin" "-display_charset=UTF-8"))

(defvar mm-insert-inline-use-utf-8 nil)

(defadvice mm-insert-inline (around mm-insert-inline-utf-8)
  (let ((x (point)))
    (prog1 (progn ad-do-it)
      (when mm-insert-inline-use-utf-8
        (decode-coding-region x (point-max) 'utf-8)))))
(ad-activate 'mm-insert-inline)

(defadvice mm-inline-text-html (around mm-inline-text-html-utf-8)
  (let ((mm-insert-inline-use-utf-8 t))
    ad-do-it))
(ad-activate 'mm-inline-text-html)
于 2013-11-19T19:31:48.237 に答える