summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoey Hess <joey@kodama.kitenet.net>2008-07-21 22:11:24 -0400
committerJoey Hess <joey@kodama.kitenet.net>2008-07-21 22:11:24 -0400
commited05e40566a8d2a39530507598d835764885cf73 (patch)
tree64b5251990cad765a1118087fbbd72bc9373d9f8
parent6e243a45e5df8ec2e24d47b3466882ad6b8e0f62 (diff)
error if nothing selected
-rw-r--r--IkiWiki/Plugin/remove.pm9
1 files changed, 6 insertions, 3 deletions
diff --git a/IkiWiki/Plugin/remove.pm b/IkiWiki/Plugin/remove.pm
index 7cc1d615e..21028cde3 100644
--- a/IkiWiki/Plugin/remove.pm
+++ b/IkiWiki/Plugin/remove.pm
@@ -30,7 +30,6 @@ sub confirmation_form ($$) { #{{{
eval q{use CGI::FormBuilder};
error($@) if $@;
- my @fields=qw(do page);
my $f = CGI::FormBuilder->new(
name => "remove",
header => 0,
@@ -40,7 +39,7 @@ sub confirmation_form ($$) { #{{{
params => $q,
action => $config{cgiurl},
stylesheet => IkiWiki::baseurl()."style.css",
- fields => \@fields,
+ fields => [qw{do page}],
);
$f->field(name => "do", type => "hidden", value => "remove", force => 1);
@@ -98,7 +97,11 @@ sub formbuilder (@) { #{{{
removal_confirm($q, $session, 0, $form->field("page"));
}
elsif ($form->submitted eq "Remove Attachments") {
- removal_confirm($q, $session, 1, $q->param("attachment_select"));
+ my @pages=$q->param("attachment_select");
+ if (! @pages) {
+ error(gettext("Please select the attachments to remove."));
+ }
+ removal_confirm($q, $session, 1, @pages);
}
}
} #}}}