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

Diff for /cvsweb/cvsweb.cgi between version 3.5 and 3.7

version 3.5, 2000/07/28 19:38:26 version 3.7, 2000/07/29 09:24:14
Line 161  $maycompress =(($ENV{HTTP_ACCEPT_ENCODING} =~ m`gzip`
Line 161  $maycompress =(($ENV{HTTP_ACCEPT_ENCODING} =~ m`gzip`
 # to hold our state - they will be added (with  # to hold our state - they will be added (with
 # their current value) to any link/query string  # their current value) to any link/query string
 # you construct  # you construct
 @stickyvars = qw(cvsroot hideattic sortby logsort fonly_with_tag);  @stickyvars = qw(cvsroot hideattic sortby logsort f only_with_tag);
   
 if (-f $config) {  if (-f $config) {
     do $config;      do $config;
Line 1472  sub getDirLogs {
Line 1472  sub getDirLogs {
     if ($tag) {      if ($tag) {
         #can't use -r<tag> as - is allowed in tagnames, but misinterpreated by rlog..          #can't use -r<tag> as - is allowed in tagnames, but misinterpreated by rlog..
         if (! open($fh, "-|")) {          if (! open($fh, "-|")) {
                 close(STDERR); # rlog may complain; ignore.                  open(STDERR, '>/dev/null'); # rlog may complain; ignore.
                 exec("rlog",@files);                  exec('rlog', @files);
         }          }
     }      }
     else {      else {
         my $kidpid = open($fh, "-|");          my $kidpid = open($fh, "-|");
         if (! $kidpid) {          if (! $kidpid) {
                 open(STDERR, '>/dev/null'); # rlog may complain; ignore.                  open(STDERR, '>/dev/null'); # rlog may complain; ignore.
                 exec("rlog","-r",@files);                  exec('rlog', '-r', @files);
         }          }
     }      }
     $state = "start";      $state = "start";
Legend:
Removed from v.3.5  
changed lines
  Added in v.3.7
CVSweb