[첫화면으로]UseModWiki소스수정/Vote매크로

마지막으로 [b]

<vote(count[,scale])> 매크로 추가

sub MacroSubst {
    ...
### 다음 라인 추가
    $txt =~ s/\&__LT__;vote\((\d+)(,(\d+))?\)&__GT__;/&MacroVote($1,$3)/gei;
###
    return $txt;
}
# 다음 함수를 통채로 추가
sub MacroVote {
    my ($count, $scale) = @_;
    my $maximum = 1000;
    $scale = 10 if ($scale eq '');
    my $width = $count * $scale;
    $width = $maximum if ($width > $maximum);

    return "<table ".(($width)?"bgcolor=\"lightgrey\" ":"")
        ."width=\"$width\" style=\"border:1 solid gray;\">"
        ."<tr><td style=\"padding:0; border:none; font-size:8pt;\">$count"
        ."</td></tr></table>";
}


위키위키분류

마지막 편집일: 2007-1-8 12:19 pm (변경사항 [d])
1041 hits | Permalink | 변경내역 보기 [h] | 페이지 소스 보기