aboutsummaryrefslogtreecommitdiffstats
path: root/CVSROOT/cfg.pm
diff options
context:
space:
mode:
authorjoe <joe@FreeBSD.org>2001-11-15 20:26:20 +0800
committerjoe <joe@FreeBSD.org>2001-11-15 20:26:20 +0800
commit67234ce6e2bd5ec843f88caff83a736665be9f8d (patch)
treea9ca306464c245f6b90c6b6394abc794dc5ca66e /CVSROOT/cfg.pm
parent3edebeb4b1b3ce74f876e66021b23565681131c1 (diff)
downloadfreebsd-ports-gnome-67234ce6e2bd5ec843f88caff83a736665be9f8d.tar.gz
freebsd-ports-gnome-67234ce6e2bd5ec843f88caff83a736665be9f8d.tar.zst
freebsd-ports-gnome-67234ce6e2bd5ec843f88caff83a736665be9f8d.zip
Remove all references to /home/ncvs; the CVSROOT env variable is sufficient
to determine the location now-a-days. Move the name of the exclude file into the configuration file. Partly Submitted by: alfred
Diffstat (limited to 'CVSROOT/cfg.pm')
-rwxr-xr-xCVSROOT/cfg.pm14
1 files changed, 9 insertions, 5 deletions
diff --git a/CVSROOT/cfg.pm b/CVSROOT/cfg.pm
index b1509d7bde22..68efbece59a4 100755
--- a/CVSROOT/cfg.pm
+++ b/CVSROOT/cfg.pm
@@ -14,12 +14,15 @@
package cfg;
use strict;
use vars qw(
- $ADD_TO_LINE $CHECK_HEADERS $DEBUG $FILE_PREFIX $IDHEADER
- $LAST_FILE $MAILADDRS $MAILBANNER $MAILCMD $MAIL_BRANCH_HDR
+ $ADD_TO_LINE $CHECK_HEADERS $DEBUG $EXCLUDE_FILE $FILE_PREFIX
+ $IDHEADER $LAST_FILE $MAILADDRS $MAILBANNER $MAILCMD $MAIL_BRANCH_HDR
$MAIL_ON_DIR_CREATION $MAIL_TRANSFORM $PID $PROG_CVS $PROG_MV
$TMPDIR $UNEXPAND_RCSID %TEMPLATE_HEADERS @COMMIT_HOSTS
);
+my $CVSROOT = $ENV{'CVSROOT'} || die "Can't determine \$CVSROOT!";
+
+
######################
### global options ###
@@ -87,10 +90,11 @@ $PROG_MV = '/bin/mv'; # mv(1)
# Check for instances of $IDHEADER in committed files, and
# bomb out if they're not present, or corrupted.
-# Exclusions can be specified in the CVSROOT/exclude file.
+# Exclusions can be specified in the exclude file.
# Currently $IDHEADER must be an instance of '$ CVSHeader $', or an alias
# defined in CVSROOT/options.
$CHECK_HEADERS = 0;
+$EXCLUDE_FILE = "$CVSROOT/CVSROOT/exclude";
# WARNING: You will also need to be running the version of cvs that
# the FreeBSD project is using; I believe that we have some local patches
@@ -208,8 +212,8 @@ sub add_cvsweb_entry {
# Load the local configuration file, that allows the entries in this
# file to be overridden.
######################################################################
-eval { require "$ENV{CVSROOT}/CVSROOT/cfg_local.pm" }
- if -e "$ENV{CVSROOT}/CVSROOT/cfg_local.pm";
+eval { require "$CVSROOT/CVSROOT/cfg_local.pm" }
+ if -e "$CVSROOT/CVSROOT/cfg_local.pm";
warn $@ if $@;
1; # Perl requires all modules to return true. Don't delete!!!!