print DIFFIN $content;
close DIFFIN;
- my $ret;
+ my $ret='';
while (<DIFFOUT>) {
if (defined $ret) {
$ret.=$_;
sub formbuilder_setup { #{{{
my %params=@_;
my $form=$params{form};
- my $page=$form->field("page");
- return if $form->title ne "editpage"
- || $form->field("do") ne "edit";
+ return if defined ! $form->field("do") || $form->field("do") ne "edit";
- $page = IkiWiki::titlepage(IkiWiki::possibly_foolish_untaint($page));
+ my $page=$form->field("page");
+ $page = IkiWiki::possibly_foolish_untaint($page);
return unless exists $pagesources{$page};
push @{$params{buttons}}, "Diff";