PyukiWiki CVS Commit
pyuki****@lists*****
2012年 6月 22日 (金) 07:23:43 JST
Index: PyukiWiki-Devel/lib/wiki_func.cgi diff -u PyukiWiki-Devel/lib/wiki_func.cgi:1.23 PyukiWiki-Devel/lib/wiki_func.cgi:1.24 --- PyukiWiki-Devel/lib/wiki_func.cgi:1.23 Fri Jun 22 07:08:58 2012 +++ PyukiWiki-Devel/lib/wiki_func.cgi Fri Jun 22 07:23:43 2012 @@ -1,6 +1,6 @@ ###################################################################### # wiki_func.cgi - This is PyukiWiki, yet another Wiki clone. -# $Id: wiki_func.cgi,v 1.23 2012/06/21 22:08:58 papu Exp $ +# $Id: wiki_func.cgi,v 1.24 2012/06/21 22:23:43 papu Exp $ # # "PyukiWiki" ver 0.2.1-alpha1-dev3 $$ # Copyright (C) 2004-2012 Nekyo @@ -635,10 +635,11 @@ return $mod if $::_module_loaded{$mod}++; # bug fix 0.2.0-p3 # comment if($mod=~/^[\w\:]{1,64}$/) { + require $mod; unless($@) { # debug - $::debug.="Load perl module $arg\n"; # debug + $::debug.="Load perl module $mod\n"; # debug } else { # debug - $::debug.="Load perl module $arg failed\n";# debug + $::debug.="Load perl module $mod failed\n";# debug } # debug $mod=undef if($@); return $mod;