/[mon-modules]/monshow.cgi
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 /monshow.cgi

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

revision 1.2 by dpavlin, Sat Aug 10 16:44:38 2002 UTC revision 1.3 by dpavlin, Thu Oct 3 10:01:22 2002 UTC
# Line 1294  EOF Line 1294  EOF
1294  EOF  EOF
1295          # generate page-by-page output          # generate page-by-page output
1296          my $on_page=10;          my $on_page=10;
1297          my $max_page=int(($#wml + $on_page -1) / $on_page);          my $max_page=int(($#wml + $on_page) / $on_page) - 1;
1298    
1299          if ($WAP) {          if ($WAP) {
1300                  my $p = $QUERY_ARGS{"p"} || 1;  # current page                  my $p = $QUERY_ARGS{"p"} || 1;  # current page
# Line 1305  EOF Line 1305  EOF
1305                  }                  }
1306                  # navigation                  # navigation
1307                  $OUT_BUF .= "<p>";                  $OUT_BUF .= "<p>";
1308                  for (my $i = 1; $i < $max_page; $i++) {                  for (my $i = 1; $i <= $max_page; $i++) {
1309                          if ($i == $p) {                          if ($i == $p) {
1310                                  $OUT_BUF .= "<b>$i</b> ";                                  $OUT_BUF .= "<b>$i</b> ";
1311                          } else {                          } else {

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

  ViewVC Help
Powered by ViewVC 1.1.26