2011年2月12日

[mew-dist 29339] Re:テキスト付きPDFをinlineで読むには

北口です。

> SPC を押すと pdftotext を使って Message バッファに表示し、

Windowsでも問題なく動作するようなので、mew-win32.elへの
パッチを添付します。
# バイナリはxpdfのサイトにあるものを使っています。

あと、

> C-cC-e で外部プログラムを表示するようにしてみました。

の手順がバッファに表示されないのも何なので、mew-mime.elの
方もちょっといじってみたのですが、どうでしょうか?


--
Shuichi KITAGUCHI // kit@xxxxx / ki@xxxxx

Content-Disposition: inline; filename=diffs

diff --git a/mew-mime.el b/mew-mime.el
index 97863ac..30f3500 100644
--- a/mew-mime.el
+++ b/mew-mime.el
@@ -590,7 +590,7 @@
(if (not doit)
(progn
(mew-elet (insert "\n"))
- (mew-mime-part-messages nil))
+ (mew-mime-part-messages t))
(setq file1 (mew-make-temp-name))
(with-current-buffer cache
(mew-flet
diff --git a/mew-win32.el b/mew-win32.el
index a4525e7..01b3447 100644
--- a/mew-win32.el
+++ b/mew-win32.el
@@ -132,7 +132,9 @@
(defvar mew-prog-delivery-status 'mew-mime-text/plain)
(defvar mew-prog-postscript mew-w32-exec)
(defvar mew-prog-pgp-keys '(mew-mime-pgp-keys mew-mime-pgp-keys-ext))
-(defvar mew-prog-pdf mew-w32-exec)
+(defvar mew-prog-application/pdf "pdftotext")
+(defvar mew-prog-pdf-ext mew-w32-exec)
+(defvar mew-prog-pdf `(mew-mime-application/pdf ,mew-prog-pdf-ext))
(defvar mew-prog-xml2 '(mew-mime-application/xml
mew-mime-application/xml-ext))
(defvar mew-prog-oasys mew-w32-exec)

投稿者 xml-rpc : 2011年2月12日 01:42
役に立ちました?:
過去のフィードバック 平均:(0) 総合:(0) 投票回数:(0)
本記事へのTrackback: http://hoop.euqset.org/blog/mt-tb2006.cgi/101938
トラックバック
コメント
コメントする




画像の中に見える文字を入力してください。