@@ -62,8 +62,8 @@ sub parse_query { # Modified from unescape as found in CGI::Util # (can't use CGI::Util due to + oddity from XMLHTTP). - $val =~ s{%(?:([0-9a-fA-F]{2})|u([0-9a-fA-F]{4}))} { - if(defined($1)) { + $val =~ s{%(?:([0-9a-fA-F]{2})|u([0-9a-fA-F]{4}))} { + if(defined($1)) { if(defined($ext) && $ext & 2 and hex($1) > 0x7F) { make_utf8("00$1"); }else{ @@ -103,11 +103,11 @@ sub parse_query { sub parse_cookie { if(exists $ENV{HTTP_COOKIE} && $ENV{HTTP_COOKIE} =~ /cgiircauth/) { - for(split /;/, $ENV{HTTP_COOKIE}) { - s/^\s+//; - my($name,$value) = split(/=/,$_,2); - return $value if $name eq "cgiircauth"; - } + for(split /;/, $ENV{HTTP_COOKIE}) { + s/^\s+//; + my($name,$value) = split(/=/,$_,2); + return $value if $name eq "cgiircauth"; + } } return 0; } modules/parse.pl 8410daa39f53a6d5630a086d6a1683d6ef551b8f David Leadbeater dgl@dgl.cx http://github.com/dgl/cgiirc/commit/7957ff7d2338d13520e094fea9844185f2e20d83 7957ff7d2338d13520e094fea9844185f2e20d83 2008-11-10T12:17:50-08:00 2008-11-10T12:17:50-08:00 Get rid of some tabs that crept in a long time ago.. 1b352d98e17c2cc9ad6069bb11fed41eb37445b2 David Leadbeater dgl@dgl.cx