diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-06-17 01:44:19 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-06-17 01:44:19 +0000 |
commit | f5eb3df1fab53ed6fe1359a8d6a339a321626db8 (patch) | |
tree | ed1df24029de4d9730edd9c78323e4906c399c68 /IkiWiki | |
parent | bd1b505bc99588cf77784308be8e4969ed8a8d08 (diff) | |
download | ikiwiki-f5eb3df1fab53ed6fe1359a8d6a339a321626db8.tar ikiwiki-f5eb3df1fab53ed6fe1359a8d6a339a321626db8.tar.gz |
* More utf-8 fixes from Recai, partly to things I broke above:
- The serious problem is that writefile() saves the content in undecoded
format in CGI, hence all (non-ascii) chars are corrupted permanently.
- Comment field in edit page is not decoded and all the non-ascii chars in
this field are corrupted as the result. We should decode it as we do it
for the content.
Diffstat (limited to 'IkiWiki')
-rw-r--r-- | IkiWiki/CGI.pm | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/IkiWiki/CGI.pm b/IkiWiki/CGI.pm index 0d763caa3..9d2ad8cdd 100644 --- a/IkiWiki/CGI.pm +++ b/IkiWiki/CGI.pm @@ -43,7 +43,6 @@ sub cgi_recentchanges ($) { #{{{ styleurl => styleurl(), baseurl => "$config{url}/", ); - # XXX why is this needed? If it's raw utf-8 won't print DTRT? require Encode; print $q->header(-charset=>'utf-8'), Encode::decode_utf8($template->output); } #}}} @@ -358,7 +357,10 @@ sub cgi_editpage ($$) { #{{{ # utf-8, so decode from it. require Encode; my $content = Encode::decode_utf8($form->field('editcontent')); - $form->field(name => "editcontent", value => $content, force => 1); + $form->field(name => "editcontent", + value => $content, force => 1); + $form->field(name => "comments", + value => Encode::decode_utf8($form->field('comments')), force => 1); $form->tmpl_param("page_preview", htmlize($config{default_pageext}, linkify($page, $page, $content))); @@ -441,13 +443,17 @@ sub cgi_editpage ($$) { #{{{ # save page page_locked($page, $session); - my $content=$form->field('editcontent'); + # Decode utf-8 since FormBuilder does not + require Encode; + my $content=Encode::decode_utf8($form->field('editcontent')); + $content=~s/\r\n/\n/g; $content=~s/\r/\n/g; writefile($file, $config{srcdir}, $content); my $message="web commit "; - if (length $session->param("name")) { + if (defined $session->param("name") && + length $session->param("name")) { $message.="by ".$session->param("name"); } else { @@ -455,8 +461,6 @@ sub cgi_editpage ($$) { #{{{ } if (defined $form->field('comments') && length $form->field('comments')) { - # Decode utf-8 since FormBuilder does not. - require Encode; $message.=Encode::decode_utf8(": ".$form->field('comments')); } |