w3m

Unnamed repository; edit this file to name it for gitweb.
git clone https://logand.com/git/w3m.git/
Log | Files | Refs | README

commit 5311b73dfcae7842ade4edede0483feda2c23bfe
parent a86050e9b7e17c1143a7de26de71ddcd94fc68bc
Author: ukai <ukai>
Date:   Thu, 27 Feb 2003 15:14:40 +0000

[w3m-dev 03783] pipe to "command1 | command2"
* Bonus/utf8.cgi: added
From: Hironori SAKAMOTO <hsaka@mth.biglobe.ne.jp>

Diffstat:
ABonus/utf8.cgi | 21+++++++++++++++++++++
MChangeLog | 5+++++
2 files changed, 26 insertions(+), 0 deletions(-)

diff --git a/Bonus/utf8.cgi b/Bonus/utf8.cgi @@ -0,0 +1,21 @@ +#!/usr/bin/perl +# +# [w3m-dev 03783] +# Install it in $LIB/utf8.cgi and configure keymap as +# keymap "x u" GOTO file:/$LIB/utf8.cgi +# +$conv = "lv -Iu -Oe"; +# $conv = "iconv -f UTF-8 -t EUC-JP"; +$type = $ENV{W3M_TYPE} || "text/plain"; +$url = $ENV{W3M_URL}; +$file = $ENV{W3M_SOURCEFILE}; +-f $file || exit; +$| = 1; +print <<EOF; +Content-Type: $type; charset=EUC-JP + +EOF +if ($type =~ /^text\/html/i && $url) { + print "<BASE HREF=\"$url\">\n"; +} +exec split(" ", $conv), $file; diff --git a/ChangeLog b/ChangeLog @@ -1,3 +1,8 @@ +2003-02-28 Hironori SAKAMOTO <hsaka@mth.biglobe.ne.jp> + + * [w3m-dev 03783] pipe to "command1 | command2" + * Bonus/utf8.cgi: added + 2003-02-27 Hironori SAKAMOTO <hsaka@mth.biglobe.ne.jp> * [w3m-dev 03784] ftp directory support