cvsweb/cvsweb.cgi - diff

Return to cvsweb.cgi CVS log

Up to [cvsweb.bsd.lv] / cvsweb

Diff for /cvsweb/cvsweb.cgi between version 4.25 and 4.26

version 4.25, 2019/11/26 11:53:01

version 4.26, 2019/11/26 12:04:55

Line 69 use vars qw (

$bylog $byfile $defaultDiffType $logsort $cvstree $cvsroot

$charset $output_filter

@command_path %CMD $allow_compress $backicon $diricon $fileicon

$fullname $cvstreedefault $logo $defaulttitle $address $binfileicon

$fullname $logo $defaulttitle $address $binfileicon

$long_intro $short_instruction $shortLogLen $show_author

$tablepadding $hr_breakable $showfunc $hr_ignwhite $hr_ignkeysubst

$inputTextSize $mime_types $allow_annotate $allow_markup $allow_mailtos

Line 198 $config = '/conf/cvsweb/cvsweb.conf';

@CVSrepositories = @CVSROOT = %CVSROOT = %MIRRORS = %DEFAULTVALUE = %ICONS =

%MTYPES = %tags = %alltags = %fileinfo = %DIFF_COMMANDS = ();

$cvstreedefault = $logo = $defaulttitle =

$logo = $defaulttitle =

$address = $long_intro = $short_instruction = $shortLogLen = $show_author =

$tablepadding = $hr_breakable = $showfunc = $hr_ignwhite =

$hr_ignkeysubst = $inputTextSize = $mime_types = $allow_annotate =

Line 472 for (my $i = 0; $i < scalar(@CVSrepositories); $i += 2

next;

}

$rootfound ||= 1;

$cvstreedefault = $key unless defined($cvstreedefault);

$CVSROOTdescr{$key} = $descr;

$CVSROOT{$key} = $root;

push(@CVSROOT, $key);

Line 485 unless ($rootfound) {

Line 484 unless ($rootfound) {

}

undef $rootfound;

$DEFAULTVALUE{cvsroot} = $CVSrepositories[0];

# Default CVS root

if (!defined($CVSROOT{$cvstreedefault})) {

fatal("500 Internal Error",

'<code>$cvstreedefault</code> points to a repository (%s) not ' .

'defined in <code>@CVSrepositories</code> in your configuration ' .

'file (<code>%s</code>).',

$cvstreedefault,

$config);

}

$DEFAULTVALUE{cvsroot} = $cvstreedefault;

while (my ($key, $defval) = each %DEFAULTVALUE) {

# Replace not given parameters with defaults.

Line 576 $logsort = $input{logsort};

Line 563 $logsort = $input{logsort};

if ($input{cvsroot} && $CVSROOT{$input{cvsroot}}) {

$cvstree = $input{cvsroot};

} else {

$cvstree = $cvstreedefault;

$cvstree = $CVSrepositories[0];

}

$cvsroot = $CVSROOT{$cvstree};

Line 1134 EOF

Line 1121 EOF

printf(qq{<input type="hidden" name="%s" value="%s" />\n},

$v, $input{$v} || 0);

}

if ($cvstree ne $cvstreedefault) {

if ($cvstree ne $CVSrepositories[0]) {

print "<input type=\"hidden\" name=\"cvsroot\" value=\"$cvstree\" />\n";

}

print <<EOF;

CVSweb