From c3d85a91e787812341de5006ca1270cad5991c84 Mon Sep 17 00:00:00 2001
From: mertz
Date: Fri, 17 Jun 2005 21:08:44 +0000
Subject: updated with the new cvs database (useful for building the cpan tgz
 from a cvs export)

---
 Perl/export2cpan | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'Perl')

diff --git a/Perl/export2cpan b/Perl/export2cpan
index 635a17c..23e0c06 100755
--- a/Perl/export2cpan
+++ b/Perl/export2cpan
@@ -21,7 +21,8 @@
 use strict;
 
 my $ZINC_PREFIX = 'tk-zinc';
-my $DEFAULT_SERVER = 'liszt.pii.ath.cena.fr';
+my $DEFAULT_SERVER = 'cvs.tkzinc.org';
+my $DEFAULT_CVS_MODULE = '/srv/tkzinc/cvsroot';
 my $TMP = '/tmp/forCPAN';
 
 # computing major, minor and patchlevel from var defined in ../configure.in
@@ -97,8 +98,8 @@ if ($FROM_CVS) {
     system ("mkdir $TMP");
     chdir("$TMP");
     # the following command always fail with cvs 1.11.1p1 !!
-    # my $command = "cd $TMP; cvs -d $server:/pii/repository export -r $cvstag -d $DIR_FROM_CVS Tkzinc";
-    my $command = "cd $TMP; cvs -d /pii/repository export -r $cvstag -d $DIR_FROM_CVS Tkzinc";
+     my $command = "cd $TMP; cvs -d $server:$DEFAULT_CVS_MODULE export -r $cvstag -d $DIR_FROM_CVS Tkzinc";
+    # my $command = "cd $TMP; cvs -d /pii/repository export -r $cvstag -d $DIR_FROM_CVS Tkzinc";
     print "$command\n";
     my $error = system($command);
     die "CVS extraction did not succeed" if $error;
-- 
cgit v1.1