[w3m-dev 02877] some fixes for urimethodmap

* config.h.dist (RC_DIR): remove tailing /
* configure (mailer): if use_w3mmailer = y, don't ask mailer
* configure (RC_DIR): remove tailing /
* fm.h (Mailer): ifndef USE_W3MMAILER
* main.c (MAIN): ifndef USE_W3MMAILER getenv("MAILER")
* rc.c ("mailer"): ifndef USE_W3MMAILER
* regex.c (newRegex0): \ escape kanji chars
* url.c (searchURIMethods): need escape for -
* scripts/w3mmail.cgi.in: move $url, $qurl
* scripts/w3mmail.cgi.in: url_unquote $to
From: Hironori Sakamoto <hsaka@mth.biglobe.ne.jp>

1 files changed, 4 insertions, 4 deletions

diff --git a/scripts/w3mmail.cgi.in b/scripts/w3mmail.cgi.in
index 30d098e..5602ee5 100755
--- a/scripts/w3mmail.cgi.in
+++ b/scripts/w3mmail.cgi.in
@@ -1,25 +1,25 @@
 #!@PERL@
 
-$rcsid = q$Id: w3mmail.cgi.in,v 1.4 2002/01/20 17:06:42 ukai Exp $;
+$rcsid = q$Id: w3mmail.cgi.in,v 1.5 2002/01/21 15:56:13 ukai Exp $;
 ($id = $rcsid) =~ s/^.*,v ([\d\.]*).*/$1/;
 ($prog=$0) =~ s/.*\///;
 
 $query = $ENV{'QUERY_STRING'};
 $local_cookie = $ENV{'LOCAL_COOKIE'};
-$url = $query;
 $SENDMAIL = '/usr/lib/sendmail';
 $SENDMAIL = '/usr/sbin/sendmail' if -x '/usr/sbin/sendmail';
 $SENDMAIL_OPT = '-oi -t';
 
-$qurl = &html_quote($url);
-
 if ($query =~ s/^\w+://) {
+    $url = $query;
+    $qurl = &html_quote($url);
     $to = $query;
     $opt = '';
     if ($to =~ /^([^?]*)\?(.*)$/) {
 	$to = $1;
 	$opt = $2;
     }
+    $to = &url_unquote($to);
     %opt = &parse_opt($opt);
 
     @to = ($to);