use strict;
use IkiWiki;
use IkiWiki::UserInfo;
-use encoding 'utf8'; # force use of utf8 for io layer
+use open qw{:utf8 :std};
use Encode;
package IkiWiki;
}
$page=lc($page);
- my $file=$page.$config{default_pageext};
+ my $file;
if (exists $pagesources{lc($page)}) {
$file=$pagesources{lc($page)};
}
+ else {
+ $file=$page.".".$config{default_pageext};
+ }
my $newfile=0;
if (! -e "$config{srcdir}/$file") {
$newfile=1;
$form->field(name => "comments",
value => $comments, force => 1);
$form->tmpl_param("page_preview",
- htmlize($config{default_pageext},
+ htmlize(pagetype($file),
linkify($page, $page, $content)));
}
else {