diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-03-08 22:16:03 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2007-03-08 22:16:03 +0000 |
commit | 43fd7cc0c5510fb6bc75b71c169a3da7c0517a0a (patch) | |
tree | f7793382c1a0d33598467e0b903f1dc6f75e1cfd /IkiWiki/CGI.pm | |
parent | 5b796b0bdb5af46d327ddb1196189713aa1f56a5 (diff) | |
download | ikiwiki-43fd7cc0c5510fb6bc75b71c169a3da7c0517a0a.tar ikiwiki-43fd7cc0c5510fb6bc75b71c169a3da7c0517a0a.tar.gz |
correct dup page name detect in blog posting code
Diffstat (limited to 'IkiWiki/CGI.pm')
-rw-r--r-- | IkiWiki/CGI.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm index 05f4c6e0f..1c4e088dc 100644 --- a/IkiWiki/CGI.pm +++ b/IkiWiki/CGI.pm @@ -686,7 +686,7 @@ sub cgi (;$$) { #{{{ # if the page already exists, munge it to be unique my $from=$q->param('from'); my $add=""; - while (exists $pagecase{lc "$from/$page$add"}) { + while (exists $pagecase{lc($from."/".titlepage($page).$add)}) { $add=1 unless length $add; $add++; } |