svnno****@sourc*****
svnno****@sourc*****
2008年 7月 26日 (土) 02:29:30 JST
Revision: 724 http://svn.sourceforge.jp/cgi-bin/viewcvs.cgi?root=slashdotjp&view=rev&rev=724 Author: tach Date: 2008-07-26 02:29:30 +0900 (Sat, 26 Jul 2008) Log Message: ----------- fix for correct url Modified Paths: -------------- slashjp/branches/2.5.0.192/Slash/Apache/User/User.pm -------------- next part -------------- Modified: slashjp/branches/2.5.0.192/Slash/Apache/User/User.pm =================================================================== --- slashjp/branches/2.5.0.192/Slash/Apache/User/User.pm 2008-07-25 14:38:18 UTC (rev 723) +++ slashjp/branches/2.5.0.192/Slash/Apache/User/User.pm 2008-07-25 17:29:30 UTC (rev 724) @@ -637,8 +637,9 @@ } # faq for slashdot.jp - if ($uri =~ m!^/faq (?: /([^?]*) | /? ) (?: \?(.*) )? $!x) { + if ($uri =~ m!^/faq (?: (/[^?]*) | /? ) (?: \?(.*) )? $!x) { my($word, $query) = ($1, $2); + $word ? $word =~ s!^/!! : redirect("$constants->{absolutedir}/faq/"); my @args = ($query); if ($word) { $word = "-$word";