/[wopi]/make_poll.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /make_poll.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.18 by dpavlin, Sat Nov 8 21:59:25 2003 UTC revision 1.19 by dpavlin, Sat Nov 8 22:12:57 2003 UTC
# Line 695  sub radiobuttons_tab { Line 695  sub radiobuttons_tab {
695                          # shownumbers="before|after"                          # shownumbers="before|after"
696                          my $shownumbers=lc(x($attref->{shownumbers})) || 'no';                          my $shownumbers=lc(x($attref->{shownumbers})) || 'no';
697                          my $showlabels=lc(x($attref->{showlabels})) || 'no';                          my $showlabels=lc(x($attref->{showlabels})) || 'no';
698                            my $class=lc(x($attref->{class})) || '';
699                            $class=' class="'.$class.'"' if ($class);
700                          my $p=new_que();                          my $p=new_que();
701                          for (my $i=1; $i<=$nr; $i++) {                          for (my $i=1; $i<=$nr; $i++) {
702                                  $body.="<td>";                                  $body.="<td$class>";
703                                  $body.=$i if ($shownumbers eq "before");                                  $body.=$i if ($shownumbers eq "before");
704                                  if ($showlabels eq "before" && $attref->{"label_$i"}) {                                  if ($showlabels eq "before" && $attref->{"label_$i"}) {
705                                          $body.=x($attref->{"label_$i"});                                          $body.=x($attref->{"label_$i"});

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

  ViewVC Help
Powered by ViewVC 1.1.26