Changeset 15519

Show
Ignore:
Timestamp:
07/09/08 00:49:47 (5 years ago)
Author:
hio
Message:

WebClient?, method="post" は対応できなかったりするぽい.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/tiarra/trunk/module/System/WebClient.pm

    r15324 r15519  
    509509  $DEBUG and $this->_debug("$peer: check auth ..."); 
    510510  my $accepted_list = $this->auth($conflist, $req); 
     511  $DEBUG and $this->_debug("$peer: auth=".Dumper($accepted_list));use Data::Dumper; 
    511512  my $authtoken_list; 
    512513  if( @$accepted_list ) 
     
    591592 
    592593 
    593   $this->_debug("$peer: accept: sid=$req->{sid}"); 
     594  $this->_debug("$peer: accept: sid=".($req->{authtoken}||'-')); 
    594595  $this->_dispatch($req); 
    595596} 
     
    940941<h1>Login</h1> 
    941942 
    942 <form action="login" method="post"> 
     943<form action="login" method="POST"> 
    943944名前: <input type="text" name="n" value="<&NAME>" /><br /> 
    944945<input type="submit" value="Login" /><br /> 
     
    15811582<&CONTENT> 
    15821583 
    1583 <form action="./" method="post"> 
     1584<form action="./" method="POST"> 
    15841585ENTER: <input type="text" name="enter" value="" /> 
    15851586<input type="submit" value="入室" /><br /> 
     
    18981899<&CONTENT_RAW> 
    18991900 
    1900 <form action="./" method="post"> 
     1901<form action="./" method="POST"> 
    19011902<p> 
    19021903talk:<&NAME_MARKER_RAW><input type="text" name="m" size="60" /> 
     
    19851986      { 
    19861987        my ($key, $val) = split(/=/, $pair, 2); 
     1988        $val =~ tr/+/ /; 
    19871989        $val =~ s/%([0-9a-f]{2})/pack("H*",$1)/gie; 
    19881990        $cgi->{$key} = $val; 
     
    19961998    { 
    19971999      my ($key, $val) = split(/=/, $pair, 2); 
     2000      $val =~ tr/+/ /; 
    19982001      $val =~ s/%([0-9a-f]{2})/pack("H*",$1)/gie; 
    19992002      $cgi->{$key} = $val; 
     
    21422145<&CONTENT_RAW> 
    21432146 
    2144 <form action="./info" method="post"> 
     2147<form action="./info" method="POST"> 
    21452148TOPIC: <span class="chan-topic"><&TOPIC></span><br /> 
    21462149<input type="text" name="topic" value="<&IN_TOPIC>" /> 
     
    21522155</p> 
    21532156 
    2154 <form action="./info" method="post"> 
     2157<form action="./info" method="POST"> 
    21552158PART: <input type="text" name="part" value="<&PART_MSG>" /> 
    21562159<input type="submit" value="退室" /><br /> 
    21572160</form> 
    21582161 
    2159 <form action="./info" method="post"> 
     2162<form action="./info" method="POST"> 
    21602163JOIN <input type="hidden" name="join" value="<&CH_LONG>" /> 
    21612164<input type="submit" value="入室" /><br /> 
    21622165</form> 
    21632166 
    2164 <form action="./info" method="post"> 
     2167<form action="./info" method="POST"> 
    21652168DELETE <input type="hidden" name="delete" value="<&CH_LONG>" /> 
    21662169<input type="submit" value="削除" /><br /> 
     
    22922295<h1>設定</h1> 
    22932296 
    2294 <form action="./config" method="post"> 
     2297<form action="./config" method="POST"> 
    22952298名前: <input type="text" name="n" value="<&NAME>" /><br /> 
    22962299<input type="submit" value="変更" /><br />