correct dup page name detect in blog posting code
parent
5b796b0bdb
commit
43fd7cc0c5
|
@ -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++;
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue