X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/0a95ac2144de8552eeebabd6467bf25969352240..2a16e15122574cca9c5b52ccfc46a022a71e25dc:/IkiWiki/CGI.pm diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm index 7c12bee5b..b47c8e803 100644 --- a/IkiWiki/CGI.pm +++ b/IkiWiki/CGI.pm @@ -38,6 +38,7 @@ sub cgi_recentchanges ($) { #{{{ indexlink => indexlink(), wikiname => $config{wikiname}, changelog => [rcs_recentchanges(100)], + styleurl => styleurl(), ); print $q->header, $template->output; } #}}} @@ -64,7 +65,8 @@ sub cgi_signin ($$) { #{{{ action => $q->request_uri, header => 0, template => (-e "$config{templatedir}/signin.tmpl" ? - "$config{templatedir}/signin.tmpl" : "") + "$config{templatedir}/signin.tmpl" : ""), + stylesheet => styleurl(), ); $form->field(name => "name", required => 0); @@ -144,12 +146,13 @@ sub cgi_signin ($$) { #{{{ $session->param("name", $form->field("name")); if (defined $form->field("do") && $form->field("do") ne 'signin') { - print $q->redirect( - "$config{cgiurl}?do=".$form->field("do"). - "&page=".$form->field("page"). - "&title=".$form->field("title"). - "&subpage=".$form->field("subpage"). - "&from=".$form->field("from"));; + print $q->redirect(cgiurl( + do => $form->field("do"), + page => $form->field("page"), + title => $form->field("title"), + subpage => $form->field("subpage"), + from => $form->field("from"), + )); } else { print $q->redirect($config{url}); @@ -227,7 +230,8 @@ sub cgi_prefs ($$) { #{{{ params => $q, action => $q->request_uri, template => (-e "$config{templatedir}/prefs.tmpl" ? - "$config{templatedir}/prefs.tmpl" : "") + "$config{templatedir}/prefs.tmpl" : ""), + stylesheet => styleurl(), ); my @buttons=("Save Preferences", "Logout", "Cancel"); @@ -304,10 +308,12 @@ sub cgi_editpage ($$) { #{{{ $page=lc($page); my $file=$page.$config{default_pageext}; - my $newfile=1; if (exists $pagesources{lc($page)}) { $file=$pagesources{lc($page)}; - $newfile=0; + } + my $newfile=0; + if (! -e "$config{srcdir}/$file") { + $newfile=1; } $form->field(name => "do", type => 'hidden'); @@ -322,6 +328,7 @@ sub cgi_editpage ($$) { #{{{ $form->tmpl_param("indexlink", indexlink()); $form->tmpl_param("helponformattinglink", htmllink("", "HelpOnFormatting", 1)); + $form->tmpl_param("styleurl", styleurl()); if (! $form->submitted) { $form->field(name => "rcsinfo", value => rcs_prepedit($file), force => 1); @@ -398,7 +405,7 @@ sub cgi_editpage ($$) { #{{{ ! length $form->field('content')) { my $content=""; if (exists $pagesources{lc($page)}) { - $content=readfile("$config{srcdir}/$pagesources{lc($page)}"); + $content=readfile(srcfile($pagesources{lc($page)})); $content=~s/\n/\r\n/g; } $form->field(name => "content", value => $content,