diff options
| author | Joey Hess <joey@kodama.kitenet.net> | 2008-07-10 15:36:18 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kodama.kitenet.net> | 2008-07-10 15:36:18 -0400 |
| commit | 3879c56e71bb2e0d5fda81982d900fc93d4a893d (patch) | |
| tree | d08415b11e0e63e2e52bef91d93b137a2ce97f5b /IkiWiki | |
| parent | dcab5e2e48275dbeb3bf514c68826e73abed08bc (diff) | |
| download | ikiwiki-3879c56e71bb2e0d5fda81982d900fc93d4a893d.tar ikiwiki-3879c56e71bb2e0d5fda81982d900fc93d4a893d.tar.gz | |
Fixes creation of pages when clicking on WikiLinks starting with "/".
Diffstat (limited to 'IkiWiki')
| -rw-r--r-- | IkiWiki/CGI.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm index 52d3474f5..2a847eb17 100644 --- a/IkiWiki/CGI.pm +++ b/IkiWiki/CGI.pm @@ -304,8 +304,9 @@ sub cgi_editpage ($$) { #{{{ # This untaint is safe because we check file_pruned. my $page=$form->field('page'); $page=possibly_foolish_untaint($page); + my $absolute=($page =~ s#^/+##); if (! defined $page || ! length $page || - file_pruned($page, $config{srcdir}) || $page=~/^\//) { + file_pruned($page, $config{srcdir})) { error("bad page name"); } @@ -424,7 +425,8 @@ sub cgi_editpage ($$) { #{{{ if (! defined $from || ! length $from || $from ne $form->field('from') || file_pruned($from, $config{srcdir}) || - $from=~/^\// || + $from=~/^\// || + $absolute || $form->submitted eq "Preview") { @page_locs=$best_loc=$page; } |