PyukiWiki CVS Commit
pyuki****@lists*****
2012年 3月 13日 (火) 19:05:44 JST
Index: PyukiWiki-Devel/lib/autometarobot.inc.pl diff -u PyukiWiki-Devel/lib/autometarobot.inc.pl:1.474 PyukiWiki-Devel/lib/autometarobot.inc.pl:1.475 --- PyukiWiki-Devel/lib/autometarobot.inc.pl:1.474 Tue Mar 13 17:54:38 2012 +++ PyukiWiki-Devel/lib/autometarobot.inc.pl Tue Mar 13 19:05:44 2012 @@ -1,6 +1,6 @@ ###################################################################### # autometarobot.inc.pl - This is PyukiWiki, yet another Wiki clone. -# $Id: autometarobot.inc.pl,v 1.474 2012/03/13 08:54:38 papu Exp $ +# $Id: autometarobot.inc.pl,v 1.475 2012/03/13 10:05:44 papu Exp $ # # "PyukiWiki" version 0.2.0-p3-dev1 $$ # Author: Nanami http://nanakochi.daiba.cx/ @@ -50,7 +50,7 @@ my $keyword; if($cmd=~/edit|admin|diff|attach|backup/ || $::form{mypage} eq '' && $cmd!~/list|sitemap|recent/ - || $::form{mypage}=~/SandBox|$::resource{help}|$::resource{rulepage}|$::MenuBar|$::non_list/ + || $::form{mypage}=~/$::resource{help}|$::resource{rulepage}|$::RecentChanges|$::MenuBar|$::SideBar|$::TitleHeader|$::Header|$::Footer$::BodyHeader$::BodyFooter|$::SkinFooter|$::SandBox|$::InterWikiName|$::InterWikiSandBox|$::non_list/ || $::meta_keyword eq "" || lc $::meta_keyword eq "disable" || &is_readable($::form{mypage}) eq 0) { $robots.=<<EOD; Index: PyukiWiki-Devel/lib/ping.inc.pl diff -u PyukiWiki-Devel/lib/ping.inc.pl:1.4 PyukiWiki-Devel/lib/ping.inc.pl:1.5 --- PyukiWiki-Devel/lib/ping.inc.pl:1.4 Tue Mar 13 17:54:38 2012 +++ PyukiWiki-Devel/lib/ping.inc.pl Tue Mar 13 19:05:44 2012 @@ -1,6 +1,6 @@ ###################################################################### # ping.inc.pl - This is PyukiWiki, yet another Wiki clone. -# $Id: ping.inc.pl,v 1.4 2012/03/13 08:54:38 papu Exp $ +# $Id: ping.inc.pl,v 1.5 2012/03/13 10:05:44 papu Exp $ # # "PyukiWiki" version 0.2.0-p3-dev1 $$ # Author: Nanami http://nanakochi.daiba.cx/ @@ -59,6 +59,10 @@ my $lastmod_org; sub plugin_ping_init { + &exec_explugin_sub("lang"); + &exec_explugin_sub("urlhack"); + &exec_explugin_sub("autometarobot"); + $lastmod_org = $::database{"__update__" . $::form{mypage}} if(&is_exist_page($::form{mypage})); @@ -187,6 +191,11 @@ sub do_write_after { my($page, $mode)=@_; if($page ne '' && $mode ne "Delete") { + if($::form{mypage}=~/$::resource{help}|$::resource{rulepage}|$::RecentChanges|$::MenuBar|$::SideBar|$::TitleHeader|$::Header|$::Footer$::BodyHeader$::BodyFooter|$::SkinFooter|$::SandBox|$::InterWikiName|$::InterWikiSandBox|$::non_list/ + || $::meta_keyword eq "" || lc $::meta_keyword eq "disable" + || &is_readable($::form{mypage}) eq 0) { + return; + } &send_ping($page); } } Index: PyukiWiki-Devel/lib/trackback.inc.pl diff -u PyukiWiki-Devel/lib/trackback.inc.pl:1.3 PyukiWiki-Devel/lib/trackback.inc.pl:1.4 --- PyukiWiki-Devel/lib/trackback.inc.pl:1.3 Tue Mar 13 17:54:38 2012 +++ PyukiWiki-Devel/lib/trackback.inc.pl Tue Mar 13 19:05:44 2012 @@ -1,6 +1,6 @@ ###################################################################### # trackback.inc.pl - This is PyukiWiki, yet another Wiki clone. -# $Id: trackback.inc.pl,v 1.3 2012/03/13 08:54:38 papu Exp $ +# $Id: trackback.inc.pl,v 1.4 2012/03/13 10:05:44 papu Exp $ # # "PyukiWiki" version 0.2.0-p3-dev1 $$ # Author: Nanami http://nanakochi.daiba.cx/ @@ -41,6 +41,7 @@ sub plugin_trackback_init { &exec_explugin_sub("lang"); &exec_explugin_sub("urlhack"); + &exec_explugin_sub("autometarobot"); if($::_exec_plugined{lang} eq 2) { if($::defaultlang ne $::lang) { @@ -63,6 +64,13 @@ } else { $flg=0; } + + if($::form{mypage}=~/$::resource{help}|$::resource{rulepage}|$::RecentChanges|$::MenuBar|$::SideBar|$::TitleHeader|$::Header|$::Footer$::BodyHeader$::BodyFooter|$::SkinFooter|$::SandBox|$::InterWikiName|$::InterWikiSandBox|$::non_list/ + || $::meta_keyword eq "" || lc $::meta_keyword eq "disable" + || &is_readable($::form{mypage}) eq 0) { + return('init'=>0); + } + if($flg eq 1 && $::navi{"trackback_url"} eq '') { &dbopen($trackback::directory,\%::trackbackbase); # http://www.tohoho-web.com/lng/199912/99120066.htm # comment Index: PyukiWiki-Devel/lib/wiki.cgi diff -u PyukiWiki-Devel/lib/wiki.cgi:1.706 PyukiWiki-Devel/lib/wiki.cgi:1.707 --- PyukiWiki-Devel/lib/wiki.cgi:1.706 Tue Mar 13 17:54:38 2012 +++ PyukiWiki-Devel/lib/wiki.cgi Tue Mar 13 19:05:44 2012 @@ -1,6 +1,6 @@ ###################################################################### # wiki.cgi - This is PyukiWiki, yet another Wiki clone. -# $Id: wiki.cgi,v 1.706 2012/03/13 08:54:38 papu Exp $ +# $Id: wiki.cgi,v 1.707 2012/03/13 10:05:44 papu Exp $ # # "PyukiWiki" version 0.2.0-p3-dev1 $$ # Copyright (C) 2004-2012 Nekyo @@ -1400,7 +1400,7 @@ my $keyword; if($cmd=~/edit|admin|diff|attach|backup/ || $::form{mypage} eq '' && $cmd!~/list|sitemap|recent/ - || $::form{mypage}=~/SandBox|$::resource{help}|$::resource{rulepage}|$::MenuBar|$::non_list/ + || $::form{mypage}=~/$::resource{help}|$::resource{rulepage}|$::RecentChanges|$::MenuBar|$::SideBar|$::TitleHeader|$::Header|$::Footer$::BodyHeader$::BodyFooter|$::SkinFooter|$::SandBox|$::InterWikiName|$::InterWikiSandBox|$::non_list/ || $::meta_keyword eq "" || lc $::meta_keyword eq "disable" || &is_readable($::form{mypage}) eq 0) { $robots.=<<EOD;
