PyukiWiki CVS Commit
pyuki****@lists*****
2012年 3月 17日 (土) 21:48:21 JST
Index: PyukiWiki-Devel/lib/setting.inc.pl diff -u PyukiWiki-Devel/lib/setting.inc.pl:1.461 PyukiWiki-Devel/lib/setting.inc.pl:1.462 --- PyukiWiki-Devel/lib/setting.inc.pl:1.461 Fri Mar 16 01:38:38 2012 +++ PyukiWiki-Devel/lib/setting.inc.pl Sat Mar 17 21:48:21 2012 @@ -1,6 +1,6 @@ ###################################################################### # setting.inc.pl - This is PyukiWiki, yet another Wiki clone. -# $Id: setting.inc.pl,v 1.461 2012/03/15 16:38:38 papu Exp $ +# $Id: setting.inc.pl,v 1.462 2012/03/17 12:48:21 papu Exp $ # # "PyukiWiki" ver 0.2.0-p3-dev1 $$ # Author: Nanami http://nanakochi.daiba.cx/ @@ -62,6 +62,9 @@ my $style=$::setting_cookie{style}; if($style!~/\//) { # my $push=$::skin_name; # comment + # bug fix 0.2.0-p3 # comment + $style=~s/[\.\/]//g; + $::skin_name=$style; &skin_init; # $::skin_name=$push; # comment Index: PyukiWiki-Devel/lib/wiki.cgi diff -u PyukiWiki-Devel/lib/wiki.cgi:1.716 PyukiWiki-Devel/lib/wiki.cgi:1.717 --- PyukiWiki-Devel/lib/wiki.cgi:1.716 Fri Mar 16 01:38:38 2012 +++ PyukiWiki-Devel/lib/wiki.cgi Sat Mar 17 21:48:21 2012 @@ -1,6 +1,6 @@ ###################################################################### # wiki.cgi - This is PyukiWiki, yet another Wiki clone. -# $Id: wiki.cgi,v 1.716 2012/03/15 16:38:38 papu Exp $ +# $Id: wiki.cgi,v 1.717 2012/03/17 12:48:21 papu Exp $ # # "PyukiWiki" ver 0.2.0-p3-dev1 $$ # Copyright (C) 2004-2012 Nekyo @@ -4957,6 +4957,8 @@ my ($plugin) = @_; if (!$_plugined{$plugin}) { + # bug fix 0.2.0-p3 # comment + $plugin=~s/[\.\/]//g; my $path = "$::plugin_dir/$plugin" . '.inc.pl'; if (-e $path) { require $path; @@ -5010,6 +5012,8 @@ my ($explugin) = @_; if (!$_exec_plugined{$explugin}) { + # bug fix 0.2.0-p3 # comment + $plugin=~s/[\.\/]//g; my $path = "$::explugin_dir/$explugin" . '.inc.cgi'; if (-e $path) { require $path; @@ -5197,6 +5201,8 @@ sub load_module{ my $mod = shift; return $mod if $::_module_loaded{$mod}++; + # bug fix 0.2.0-p3 # comment + $mod=~s/[\.\/]//g; eval qq( require $mod; ); unless($@) { # debug $::debug.="$mod Loaded\n" # debug