archive/oddmuse
2
0
Fork 0
forked from github/kensanata.oddmuse
Code Pull Requests Activity

agree-disagree.pl: fix leading whitespace

Browse Source
This commit is contained in:
Alex Schroeder
2015-07-28 21:59:47 +02:00
parent c269d0c303
commit b2cae9a5a3
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
modules/agree-disagree.pl
View File

@@ -21,7 +21,7 @@ use v5.10;
our ($Now, @MyMacros, @MyRules, $DefaultStyleSheet, $q, $bol);
AddModuleDescription('agree-disagree.pl', 'AgreeDisagreePlugin');
AddModuleDescription('agree-disagree.pl', 'AgreeDisagreePlugin');
push(@MyRules, \&AgreeDisagreeSupportRule);
@@ -92,7 +92,7 @@ sub AgreeDisagreeSupportRule {
my ($ignore, $name, $time) = split(/:/, $1, 3);
push(@nayes, $name);
}
my $html = CloseHtmlEnvironments() ;
$html .= $q->div({-class=>'agreeCount'}) . ($#ayes+1) . ' ' . '</div>' ;
@@ -110,7 +110,7 @@ sub AgreeDisagreeSupportRule {
sub printNames {
my @names = @_;
my $html = '';
foreach my $name (@names) {
$html .= "$name<br>";