Permalink
Browse files

Add fix for unlimited author moderation

  • Loading branch information...
pudge committed Aug 16, 2000
1 parent 0d2ce4f commit 74eca6aa32442c74a98634aa2d0d1006cd0dba5d
Showing with 18 additions and 14 deletions.
  1. +9 −7 public_html/comments.pl
  2. +9 −7 themes/slashcode/htdocs/comments.pl
@@ -803,13 +803,15 @@ sub moderateCid {
"cid=$cid and sid='$sid'"
);
my($mid) = sqlSelect(
"id", "moderatorlog",
"uid=$I{U}{uid} and cid=$cid and sid='$sid'"
);
if ($mid) {
print "<LI>$subj ($sid-$cid, <B>Already moderated</B>)</LI>";
return;
unless ($I{U}{aseclev} > 99 && $I{authors_unlimited}) {
my($mid) = sqlSelect(
"id", "moderatorlog",
"uid=$I{U}{uid} and cid=$cid and sid='$sid'"
);
if ($mid) {
print "<LI>$subj ($sid-$cid, <B>Already moderated</B>)</LI>";
return;
}
}
my $modreason = $reason;
@@ -803,13 +803,15 @@ sub moderateCid {
"cid=$cid and sid='$sid'"
);
my($mid) = sqlSelect(
"id", "moderatorlog",
"uid=$I{U}{uid} and cid=$cid and sid='$sid'"
);
if ($mid) {
print "<LI>$subj ($sid-$cid, <B>Already moderated</B>)</LI>";
return;
unless ($I{U}{aseclev} > 99 && $I{authors_unlimited}) {
my($mid) = sqlSelect(
"id", "moderatorlog",
"uid=$I{U}{uid} and cid=$cid and sid='$sid'"
);
if ($mid) {
print "<LI>$subj ($sid-$cid, <B>Already moderated</B>)</LI>";
return;
}
}
my $modreason = $reason;

0 comments on commit 74eca6a

Please sign in to comment.