FSWiki 3.6.4対応

[fswiki/sandbox.git] / kgsoft / _ex_spam_filter_light / trunk / plugin / _ex_spam_filter_light / bbs.pm

diff --git a/kgsoft/_ex_spam_filter_light/trunk/plugin/_ex_spam_filter_light/bbs.pm b/kgsoft/_ex_spam_filter_light/trunk/plugin/_ex_spam_filter_light/bbs.pm
index 570d9e4..62abf5d 100644 (file)
--- a/kgsoft/_ex_spam_filter_light/trunk/plugin/_ex_spam_filter_light/bbs.pm
+++ b/kgsoft/_ex_spam_filter_light/trunk/plugin/_ex_spam_filter_light/bbs.pm
@@ -27,9 +27,9 @@ sub do_action {
        if($name eq ""){
                $name = "̵̾¤·¤µ¤ó";
        } else {
-               # post_name¤È¤¤¤¦¥­¡¼¤Ç¥¯¥Ã¥­¡¼¤ò¥»¥Ã¥È¤¹¤ë
+               # fswiki_post_name¤È¤¤¤¦¥­¡¼¤Ç¥¯¥Ã¥­¡¼¤ò¥»¥Ã¥È¤¹¤ë
                my $path   = &Util::cookie_path($wiki);
-               my $cookie = $cgi->cookie(-name=>'post_name',-value=>$name,-expires=>'+1M',-path=>$path);
+               my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
                print "Set-Cookie: ",$cookie->as_string,"\n";
        }
        
@@ -84,7 +84,7 @@ sub do_action {
        
        foreach(@lines){
                $content = $content.$_."\n";
-               if(/^{{bbs\s*.*}}$/ && $flag==0){
+               if(/^\{\{bbs\s*.*\}\}$/ && $flag==0){
                        if($form_count==$count){
                                $content .= "!!$subject - $name (".&Util::format_date(time()).")\n".
                                            "$message\n";
@@ -133,9 +133,9 @@ sub do_action {
        if($name    eq ""){
                $name    = "̵̾¤·¤µ¤ó";
        } else {
-               # post_name¤È¤¤¤¦¥­¡¼¤Ç¥¯¥Ã¥­¡¼¤ò¥»¥Ã¥È¤¹¤ë
+               # fswiki_post_name¤È¤¤¤¦¥­¡¼¤Ç¥¯¥Ã¥­¡¼¤ò¥»¥Ã¥È¤¹¤ë
                my $path   = &Util::cookie_path($wiki);
-               my $cookie = $cgi->cookie(-name=>'post_name',-value=>$name,-expires=>'+1M',-path=>$path);
+               my $cookie = $cgi->cookie(-name=>'fswiki_post_name',-value=>Util::url_encode($name),-expires=>'+1M',-path=>$path);
                print "Set-Cookie: ",$cookie->as_string,"\n";
        }