[mew-dist 27663] Re: [Q] Mew on Cygwin Emacs 21.3.50

[Sumio KOBAYASHI]

小林です. おはようございます.

On Thu, 10 May 2007 22:47:37 +0900 (JST),
Sumio KOBAYASHI <dki at example.com> wrote

> 小林です. こんばんは. 良い(酔い)気分で御帰宅です. 大丈夫かなあ?

どうも大丈夫でなかったようですので, 仕切直します. 失礼しました.

On Thu, 10 May 2007 16:35:51 +0900 (JST),
Hideyuki SHIRAI (白井秀行) <shirai at example.com> wrote in
Message-ID: <20070510.163551.68547962.shirai.hideyuki at example.com>:

> ところで、mew-win32.el では簡易印刷用に
> 
> (defvar mew-w32-prog-print     "notepad.exe")
> (defvar mew-w32-prog-print-arg nil)
> 
> というのが設定してあるのですが、cygwin だとなにが良いのか、ある
> いはどうすれば良いのかわかりませんか？

この機能を使ったことが無いので, コメントできない，が正解でした.
質問ですが, これは, メールの本文を, notepad に渡して, マウス操作でプリ
ンターに送り込むのでしょうか? 
環境によっては cygwin の lpr を使えるかもしれませんが，こちらも未経験
です.

小生の場合は,　Mew message を '|' を介して mewlpr という script に渡
し,　Unix マシンにつながった PS(GS) printer に送り込んでます. こんな感
じです.
------------------------------
#!/usr/bin/perl
# mewlpr prints the content of e-mail through Mew. 
#
# mewlpr $major_opt $lpr_opts
# $major_opt specifies the print region.
#     --a: all the contents of mail.
#     --s: below the subject line, default.
#     --b: body only.
# $lpr_opts are the options of a2psp.pl, based on 
#  ftp;//ftp.iij.ad.jp/pub/IIJ/dist/utashiro/perl/a2ps.pl-x.xx

$lpr_cmd = "/usr/local/bin/lps";

$major_opt = $ARGV[0];
CASE:{
    if ($major_opt =~ /^--b/){
	$sep = '^\n';
	shift (@ARGV);
	last CASE;
    }
    if ($major_opt =~ /^--s/){
	$sep = '^Subject';
	shift (@ARGV);
	last CASE;
    }
    if ($major_opt =~ /^--a/){
	$sep = '.';
	shift (@ARGV);
	last CASE;
    } else {      # default action
	$sep = '^Subject';
	last CASE;
    }
}

$lpr_opts = '';
while ($opt = $ARGV[0], $opt =~ s/^(-.+)$/$1/ && shift(@ARGV)){
    $lpr_opts .= "$opt ";
}
# print "$lpr_opts\n"; for debug
open (LPR, "| $lpr_cmd $lpr_opts") || die "$!\n";

$tag = '';
while (<>){
    $tag = 1 if (/$sep/);
    next unless ($tag);
    print LPR;
}
close LPR;

exit 0;
------------------------------

------------------------------
#! /bin/sh
# $Id: lp, print ascii files (incl. Japanese ) on PS printer.
# Copyright (c) July 30, 1995, S. Kobayashi for unix
# Copyright (c) November 13, 2006, S. Kobayashi for cygwin on Windows XP
# All rights reserved.
#
TMPDIR=/tmp
TMPFILE=$$.ps
/usr/local/bin/a2psp $* > $TMPDIR/$TMPFILE
/c/WINDOWS/system32/lpr.exe -S 192.168.2.100 -P lp c:\\cygwin\\tmp\\$TMPFILE
rm $TMPDIR/$TMPFILE
#
# Exit
#
exit 0
------------------------------

----------
Sumio KOBAYASHI <dki at example.com>