[mew-dist 27637] Re: Punycode encoder

[eamcs]

かずさん

確認が遅くなってすみません。
パッチを当てたら、「while: Args out of range: 1, 2」のエラーが出なくなり、
また、正常に動作しました。


深野哲洋

07/04/17 に 山本和彦 Kazu Yamamoto<kazu at example.com> さんは書きました:
> 山本です。
>
> ひょっとすると、白井さんの言うことが正しいかもしれません。
> mew-puny-encode で utf-16be が使われると、
> Carbon Emacs Package が何かの EL を require し、
> それが string-match などを使っているのかもしれませんね。
>
> 以下を試してみて下さい。
>
> --かず
>
> Index: mew-bq.el
> ===================================================================
> RCS file: /cvsroot/mew/mew/mew-bq.el,v
> retrieving revision 1.50
> diff -c -r1.50 mew-bq.el
> *** mew-bq.el   16 Apr 2007 09:30:48 -0000      1.50
> --- mew-bq.el   17 Apr 2007 12:25:18 -0000
> ***************
> *** 1159,1167 ****
>         (narrow-to-region beg end)
>         (goto-char (point-min))
>         (while (re-search-forward "[^.]?[^.
> !         (setq idn (mew-puny-encode (mew-match-string 0)))
>           (delete-region (match-beginning 0) (match-end 0))
> !         (insert idn)))
>         (mew-buffer-substring (point-min) (point-max)))))
>
>   (provide 'mew-bq)
> --- 1159,1167 ----
>         (narrow-to-region beg end)
>         (goto-char (point-min))
>         (while (re-search-forward "[^.]?[^.
> !         (setq idn (mew-match-string 0))
>           (delete-region (match-beginning 0) (match-end 0))
> !         (insert (mew-puny-encode idn))))
>         (mew-buffer-substring (point-min) (point-max)))))
>
>   (provide 'mew-bq)
>