Permalink
Browse files

Comments.pl - If title goes over 35 length, ellipsis added (minor)

Metamod.pl - Corrections between old variable $I{m2_maxkarma} and it's
replacement $I{m2_maxbonus}
  • Loading branch information...
1 parent c7fcde9 commit 023a377ce25c7c463372f7adddbf07494a919326 @Xliff Xliff committed Jul 10, 2000
Showing with 10 additions and 10 deletions.
  1. +2 −2 public_html/comments.pl
  2. +3 −3 public_html/metamod.pl
  3. +2 −2 themes/slashcode/htdocs/comments.pl
  4. +3 −3 themes/slashcode/htdocs/metamod.pl
View
4 public_html/comments.pl
@@ -755,8 +755,8 @@ sub moderate {
sqlUpdate(
"stories",
{
- -commentcount => "commentcount-$delCount",
- writestatus =>1
+ -commentcount => "commentcount-$delCount",
+ writestatus => 1
},
"sid=" . $I{dbh}->quote($I{F}{sid}), 1
);
View
6 public_html/metamod.pl
@@ -60,11 +60,11 @@ sub main {
#################################################################
sub karmaBonus {
- # Sliding scale: having karma closer to $I{m2_maxkarma},
+ # Sliding scale: having karma closer to $I{m2_maxbonus},
# lowers a users chance for M2 bonus.
- my $x = $I{m2_maxkarma} - $I{U}{karma};
+ my $x = $I{m2_maxbonus} - $I{U}{karma};
return 0 unless $x > 0;
- return 1 if rand($I{m2_maxkarma}) < $x;
+ return 1 if rand($I{m2_maxbonus}) < $x;
return 0;
}
View
4 themes/slashcode/htdocs/comments.pl
@@ -755,8 +755,8 @@ sub moderate {
sqlUpdate(
"stories",
{
- -commentcount => "commentcount-$delCount",
- writestatus =>1
+ -commentcount => "commentcount-$delCount",
+ writestatus => 1
},
"sid=" . $I{dbh}->quote($I{F}{sid}), 1
);
View
6 themes/slashcode/htdocs/metamod.pl
@@ -60,11 +60,11 @@ sub main {
#################################################################
sub karmaBonus {
- # Sliding scale: having karma closer to $I{m2_maxkarma},
+ # Sliding scale: having karma closer to $I{m2_maxbonus},
# lowers a users chance for M2 bonus.
- my $x = $I{m2_maxkarma} - $I{U}{karma};
+ my $x = $I{m2_maxbonus} - $I{U}{karma};
return 0 unless $x > 0;
- return 1 if rand($I{m2_maxkarma}) < $x;
+ return 1 if rand($I{m2_maxbonus}) < $x;
return 0;
}

0 comments on commit 023a377

Please sign in to comment.