[BACK]Return to cvsweb.cgi CVS log [TXT][DIR] Up to [cvsweb.bsd.lv] / cvsweb

Diff for /cvsweb/cvsweb.cgi between version 1.1.1.13 and 1.1.1.14

version 1.1.1.13, 2000/12/07 12:45:50 version 1.1.1.14, 2000/12/07 15:16:31
Line 43 
Line 43 
 # SUCH DAMAGE.  # SUCH DAMAGE.
 #  #
 # $zId: cvsweb.cgi,v 1.104 2000/11/01 22:05:12 hnordstrom Exp $  # $zId: cvsweb.cgi,v 1.104 2000/11/01 22:05:12 hnordstrom Exp $
 # $kId: cvsweb.cgi,v 1.41 2000/12/06 18:19:12 knu Exp $  # $kId: cvsweb.cgi,v 1.42 2000/12/07 15:11:24 knu Exp $
 #  #
 ###  ###
   
Line 1052  sub htmlify($;$) {
Line 1052  sub htmlify($;$) {
                        \#?)                         \#?)
                       (\d+)\b                        (\d+)\b
                      }{                       }{
                          $1 . &link($2, sprintf($prcgi, $2)) . $3                           $1 . &link($2, sprintf($prcgi, $2))
                      }egix;                       }egix;
                 } $_;                  } $_;
             } while ($_ ne $prev);              } while ($_ ne $prev);
Line 1061  sub htmlify($;$) {
Line 1061  sub htmlify($;$) {
                 s{                  s{
                   (\b$prcategories/(\d+)\b)                    (\b$prcategories/(\d+)\b)
                  }{                   }{
                      &link($1, sprintf($prcgi, $2)) . $3                       &link($1, sprintf($prcgi, $2))
                  }egox;                   }egox;
             } $_;              } $_;
         }          }
Line 1078  sub htmlify($;$) {
Line 1078  sub htmlify($;$) {
                    )                     )
                   )                    )
                  }{                   }{
                      &link($1, sprintf($mancgi, $3 ne '' ? $3 : $4, $2)) . $5                       &link($1, sprintf($mancgi, $3 ne '' ? $3 : $4, $2))
                  }egx;                   }egx;
             } $_;              } $_;
         }          }
Line 1819  again:
Line 1819  again:
                         ($branch = $revwanted) =~ s/\.0\././;                          ($branch = $revwanted) =~ s/\.0\././;
                         ($branchpoint = $branch) =~ s/\.?\d+$//;                          ($branchpoint = $branch) =~ s/\.?\d+$//;
                         $revwanted = undef if ($revwanted ne $branch);                          $revwanted = undef if ($revwanted ne $branch);
 #print "\n[revwanted=$revwanted]";  
                     } elsif ($tag ne "HEAD") {                      } elsif ($tag ne "HEAD") {
                         print "Tag not found, skip this file" if ($verbose);                          print "Tag not found, skip this file" if ($verbose);
                         $state = "skip";                          $state = "skip";
Line 2642  sub navigateHeader($$$$$) {
Line 2641  sub navigateHeader($$$$$) {
     $swhere = urlencode($filename) if ($swhere eq "");      $swhere = urlencode($filename) if ($swhere eq "");
     print "<\!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">";      print "<\!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">";
     print "<HTML>\n<HEAD>\n";      print "<HTML>\n<HEAD>\n";
     print '<!-- CVSweb $zRevision: 1.104 $  $kRevision: 1.41 $ -->';      print '<!-- CVSweb $zRevision: 1.104 $  $kRevision: 1.42 $ -->';
     print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n";      print "\n<TITLE>$path$filename - $title - $rev</TITLE></HEAD>\n";
     print  "$body_tag_for_src\n";      print  "$body_tag_for_src\n";
     print "<table width=\"100%\" border=0 cellspacing=0 cellpadding=1 bgcolor=\"$navigationHeaderColor\">";      print "<table width=\"100%\" border=0 cellspacing=0 cellpadding=1 bgcolor=\"$navigationHeaderColor\">";
Line 3025  sub http_header(;$) {
Line 3024  sub http_header(;$) {
   
 sub html_header($) {  sub html_header($) {
     my ($title) = @_;      my ($title) = @_;
     my $version = '$zRevision: 1.104 $  $kRevision: 1.41 $'; #'      my $version = '$zRevision: 1.104 $  $kRevision: 1.42 $'; #'
     http_header($charset ne "" ? "text/html; charset=$charset" : "text/html");      http_header(defined($charset) ? "text/html; charset=$charset" : "text/html");
     print <<EOH;      print <<EOH;
 <!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN"  <!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN"
  "http://www.w3.org/TR/REC-html40/loose.dtd">   "http://www.w3.org/TR/REC-html40/loose.dtd">

Legend:
Removed from v.1.1.1.13  
changed lines
  Added in v.1.1.1.14

CVSweb