urosm
/
ikiwiki
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

editpage: beautify redirection URLs, avoiding exposing the implementation detail that index.html exists

master
Simon McVittie 2008-09-21 18:22:54 +01:00
parent d8ed0007e6
commit e73987b01d
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
IkiWiki/Plugin/editpage.pm
View File

@ -94,8 +94,8 @@ sub cgi_editpage ($$) { #{{{
error("bad page name");
}
my $baseurl=$config{url}."/".htmlpage($page);
my $baseurl = urlto($page, undef, 1);
my $from;
if (defined $form->field('from')) {
($from)=$form->field('from')=~/$config{wiki_file_regexp}/;
@ -152,13 +152,13 @@ sub cgi_editpage ($$) { #{{{
if ($form->submitted eq "Cancel") {
if ($form->field("do") eq "create" && defined $from) {
redirect($q, "$config{url}/".htmlpage($from));
redirect($q, urlto($from, undef, 1));
}
elsif ($form->field("do") eq "create") {
redirect($q, $config{url});
}
else {
redirect($q, "$config{url}/".htmlpage($page));
redirect($q, urlto($page, undef, 1));
}
exit;
}
@ -249,7 +249,7 @@ sub cgi_editpage ($$) { #{{{
@page_locs=$page;
}
else {
redirect($q, "$config{url}/".htmlpage($page));
redirect($q, urlto($page, undef, 1));
exit;
}
}
@ -417,7 +417,7 @@ sub cgi_editpage ($$) { #{{{
else {
# The trailing question mark tries to avoid broken
# caches and get the most recent version of the page.
redirect($q, "$config{url}/".htmlpage($page)."?updated");
redirect($q, urlto($page, undef, 1)."?updated");
}
}