#!/usr/bin/perl
# $Header: /u/Repository/cvs_tools/tarup,v 1.11 2003/12/16 13:47:11 lukeh Exp $

require "/usr/share/cvslib.pl";

$vers = &getCVSVersionInfo();
if (!$vers || $vers eq "-")
{
	die "could not get version info";
}

$command = "git archive --format=tar --prefix=$vers/ $vers | gzip > $DISTDIR/$vers.tar.gz";
print "$command\n";
system($command);
