[Mew-Win32 00184] Re: fiber & browse-url

[Hideyuki SHIRAI]

白井@もう帰ろう、です。

From: Shuichi Kitaguchi <shuuic-k at example.com> さん曰く
Subject: [Mew-Win32 00183] Re: fiber & browse-url
Message-ID: <19980204214512B.shuuic-k at example.com>
Date: Wed, 4 Feb 1998 21:45:27 +0900

shuuic-k> From: Hideyuki SHIRAI <Shirai at example.com>
shuuic-k> Subject: [Mew-Win32 00182] Re: fiber & browse-url
shuuic-k> Date: Wed, 4 Feb 1998 21:15:16 +0900
shuuic-k> 
shuuic-k> > shuuic-k> > 白井秀行@最後はmew-distに売り込もうかなぁ。
shuuic-k> > shuuic-k> 
shuuic-k> > shuuic-k> 最終的に、どちらにしましょう?
shuuic-k> > shuuic-k> Mew 本体の方が嬉しいかな、とも思いますけども。
shuuic-k> > 
shuuic-k> > 快速Lisperの人達が見れば、regexpももっといいのを考えてくれそうで
shuuic-k> > すね。
shuuic-k> > 
shuuic-k> > # とりあえず、北口さんの身の回りの人達に密かに見せて反響を聞くな
shuuic-k> > # んてどうですか？ ;-p
shuuic-k> 
shuuic-k> 身の周りでの Emacs Lisper って、かずさんぐらいしか...(^^;

は、は、は、っと。
北口さんの身分を知らないけど、辛そうですねぇ。

# 以前、私の学生時代の友達がかずと『煙草の煙の害について』で討論をし
# たことがあると言ってた。
# 初対面の割には燃えたとのこと。UNIXフェアの後に飲みにいってだったかな？

shuuic-k> とりあえず mew-win32.el のパッチとして mew-dist に流して反響を
shuuic-k> 見ようかと思いますが、それでどうでしょう?

いいですよ。ど〜〜〜んと行って下さい。

shuuic-k> > P.S.2
shuuic-k> > おぉ、mew-os2.elを見ると、x-rot13 に対応していますね。オッフィシャ
shuuic-k> > ルにはダメだろうけど、こういう手があったか、と妙に感心した。
shuuic-k> 
shuuic-k> これ、よくわからないのでどうしても見たい時は nkf してる私...

あと、mew-shirai.el(仮名)で動いていないのは、これだけ。
# マルチパート読めた。setqとdefvarで何が違っていたの (?_?)

tm:caesar-regionって関数で暗号化/復号化が出来るから、
# と以前、私も教えてもらった(mule for win32 MLで)

mime-typeに"text/x-rot.*"とでっちあげて、mew-mime-text/plainをコ
ピーして  

(defun mew-mime-text/x-rot (begin end &optional params)
  (if (> end begin)
      (save-excursion
	(set-buffer (mew-buffer-message))
	(let ((buffer-read-only nil))
	  (insert-buffer-substring (mew-current-get 'cache) begin end)
	  (goto-char (point-min))
	  (set-mark (point-min))
	  (goto-char (point-max))
	  (mark)
	  (tm:caesar-region)
	  (if mew-eof-string

みたいにすればいいのだけど、mime-typeの取り扱いが1.91とダイナミッ
クに変わっているから、まだ、良くわからない。

# (require 'tm-def)ね。

書くときは、マルチパートで『F』押して、ファイルをセーブする前に
tm:caesar-regionして、『T』で "Text/X-Rot13-47-48"と(以前は)して
ました。

このメールがマルチパートになっていたら、これの失敗の残骸です。^^;;;