Source the config file /usr/local/etc/cvsweb and
/usr/local/etc/cvsweb-$cvsroot if exists. The config files are perl scripts. This make it possible to define local cvs roots, help messages, navigation bar and E-Mail addresses without changing the original cvsweb.cgi script.
This commit is contained in:
parent
c97e6997ab
commit
82ceb2d953
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/www/; revision=2171
2 changed files with 8 additions and 0 deletions
|
@ -30,6 +30,7 @@ require 'ctime.pl';
|
|||
|
||||
$hsty_base = "";
|
||||
require 'cgi-style.pl';
|
||||
#&get_the_source;
|
||||
|
||||
%CVSROOT = (
|
||||
'freebsd', '/home/ncvs',
|
||||
|
@ -89,6 +90,8 @@ if ($query = $ENV{'QUERY_STRING'}) {
|
|||
}
|
||||
|
||||
|
||||
$config = '/usr/local/etc/cvsweb';
|
||||
do "$config" if -f $config;
|
||||
|
||||
if ($input{'cvsroot'}) {
|
||||
if ($CVSROOT{$input{'cvsroot'}}) {
|
||||
|
@ -96,6 +99,7 @@ if ($input{'cvsroot'}) {
|
|||
$cvsroot = $CVSROOT{"$cvstree"};
|
||||
}
|
||||
}
|
||||
do "$config-$cvstree" if -f "$config-$cvstree";
|
||||
|
||||
$fullname = $cvsroot . '/' . $where;
|
||||
if (!-d $cvsroot) {
|
||||
|
|
|
@ -30,6 +30,7 @@ require 'ctime.pl';
|
|||
|
||||
$hsty_base = "";
|
||||
require 'cgi-style.pl';
|
||||
#&get_the_source;
|
||||
|
||||
%CVSROOT = (
|
||||
'freebsd', '/home/ncvs',
|
||||
|
@ -89,6 +90,8 @@ if ($query = $ENV{'QUERY_STRING'}) {
|
|||
}
|
||||
|
||||
|
||||
$config = '/usr/local/etc/cvsweb';
|
||||
do "$config" if -f $config;
|
||||
|
||||
if ($input{'cvsroot'}) {
|
||||
if ($CVSROOT{$input{'cvsroot'}}) {
|
||||
|
@ -96,6 +99,7 @@ if ($input{'cvsroot'}) {
|
|||
$cvsroot = $CVSROOT{"$cvstree"};
|
||||
}
|
||||
}
|
||||
do "$config-$cvstree" if -f "$config-$cvstree";
|
||||
|
||||
$fullname = $cvsroot . '/' . $where;
|
||||
if (!-d $cvsroot) {
|
||||
|
|
Loading…
Reference in a new issue