Similar to those in the rename plugin, although here we can't use
the form object.
return if ! defined $form->field("do") || ($form->field("do") ne "edit" && $form->field("do") ne "create") ;
return if ! defined $form->field("do") || ($form->field("do") ne "edit" && $form->field("do") ne "create") ;
- my $filename=$q->param('attachment');
+ my $filename=Encode::decode_utf8($q->param('attachment'));
if (defined $filename && length $filename &&
($form->submitted eq "Upload Attachment" || $form->submitted eq "Save Page")) {
my $session=$params{session};
if (defined $filename && length $filename &&
($form->submitted eq "Upload Attachment" || $form->submitted eq "Save Page")) {
my $session=$params{session};
IkiWiki::saveindex();
}
elsif ($form->submitted eq "Insert Links") {
IkiWiki::saveindex();
}
elsif ($form->submitted eq "Insert Links") {
- my $page=quotemeta($q->param("page"));
+ my $page=quotemeta(Encode::decode_utf8($q->param("page")));
my $add="";
foreach my $f ($q->param("attachment_select")) {
my $add="";
foreach my $f ($q->param("attachment_select")) {
+ $f=Encode::decode_utf8($f);
$f=~s/^$page\///;
$add.="[[$f]]\n";
}
$f=~s/^$page\///;
$add.="[[$f]]\n";
}
* monotone: Deal with format change in version 0.45.
(Thanks, Richard Levitte)
* rename: Fix some utf-8 problems.
* monotone: Deal with format change in version 0.45.
(Thanks, Richard Levitte)
* rename: Fix some utf-8 problems.
+ * attachment: Fix several utf-8 problems.
-- Joey Hess <joeyh@debian.org> Wed, 02 Dec 2009 17:22:21 -0500
-- Joey Hess <joeyh@debian.org> Wed, 02 Dec 2009 17:22:21 -0500