aboutsummaryrefslogtreecommitdiff
path: root/IkiWiki/Plugin/comments.pm
diff options
context:
space:
mode:
authorJoey Hess <joey@kitenet.net>2010-05-07 13:44:24 -0400
committerJoey Hess <joey@kitenet.net>2010-05-07 13:44:24 -0400
commit8d3c89f0c75c31c5e17a661150662e3efd3a146e (patch)
tree9a2fe20d9d8103f5bea8509c1198e2af76648943 /IkiWiki/Plugin/comments.pm
parentbe0c2df6db1e30b4ee4213f402a1414e2e2abd85 (diff)
downloadikiwiki-8d3c89f0c75c31c5e17a661150662e3efd3a146e.tar
ikiwiki-8d3c89f0c75c31c5e17a661150662e3efd3a146e.tar.gz
bugfixes
Diffstat (limited to 'IkiWiki/Plugin/comments.pm')
-rw-r--r--IkiWiki/Plugin/comments.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/IkiWiki/Plugin/comments.pm b/IkiWiki/Plugin/comments.pm
index 76f6551ae..93c8c4061 100644
--- a/IkiWiki/Plugin/comments.pm
+++ b/IkiWiki/Plugin/comments.pm
@@ -557,7 +557,7 @@ sub commentmoderation ($$) {
my %vars=$cgi->Vars;
my $added=0;
foreach my $id (keys %vars) {
- if ($id =~ /(.*)\Q._comment(?:_pending)?\E$/) {
+ if ($id =~ /(.*)\._comment(?:_pending)?$/) {
my $action=$cgi->param($id);
next if $action eq 'Defer' && ! $rejectalldefer;
@@ -621,7 +621,7 @@ sub commentmoderation ($$) {
id => $id,
view => $preview,
}
- } sort { $b->[1] <=> $a->[1] } comments_pending();
+ } sort { $b->[2] <=> $a->[2] } comments_pending();
my $template=template("commentmoderation.tmpl");
$template->param(