proper main sub and loadindex optimisation for cgis

master
joey 2006-03-23 07:51:52 +00:00
parent bb0193aff3
commit 384327bfd0
2 changed files with 30 additions and 24 deletions

View File

@ -271,6 +271,8 @@ sub cgi_editpage ($$) { #{{{
my $q=shift;
my $session=shift;
loadindex();
eval q{use CGI::FormBuilder};
my $form = CGI::FormBuilder->new(
fields => [qw(do rcsinfo from page content comments)],
@ -446,7 +448,6 @@ sub cgi_editpage ($$) { #{{{
}
else {
require IkiWiki::Render;
loadindex();
refresh();
saveindex();
}

51
ikiwiki
View File

@ -424,26 +424,31 @@ sub globlist_match ($$) { #{{{
return 0;
} #}}}
# main {{{
if ($config{setup}) {
require IkiWiki::Setup;
setup();
}
lockwiki();
if ($config{wrapper}) {
require IkiWiki::Wrapper;
gen_wrapper();
exit;
}
loadindex() unless $config{rebuild};
if ($config{cgi}) {
require IkiWiki::CGI;
cgi();
}
else {
require IkiWiki::Render;
rcs_update();
refresh();
saveindex();
}
#}}}
sub main () { #{{{
if ($config{setup}) {
require IkiWiki::Setup;
setup();
}
lockwiki();
if ($config{wrapper}) {
require IkiWiki::Wrapper;
gen_wrapper();
exit;
}
if ($config{cgi}) {
require IkiWiki::CGI;
cgi();
}
else {
loadindex() unless $config{rebuild};
require IkiWiki::Render;
rcs_update();
refresh();
saveindex();
}
} #}}}
main;