|
|
|
|
@@ -64,6 +64,13 @@ $DIR||='.'; $DIR =~ s/([^\/\\])[\\\/]+$/$1/;
|
|
|
|
|
|
|
|
|
|
$SOURCE="$DIR/..";
|
|
|
|
|
$DESTI="$SOURCE/build";
|
|
|
|
|
if ($SOURCE !~ /^\//)
|
|
|
|
|
{
|
|
|
|
|
print "Error: Launch the script $PROG.$Extension with its full path from /.\n";
|
|
|
|
|
print "$PROG.$Extension aborted.\n";
|
|
|
|
|
sleep 2;
|
|
|
|
|
exit 1;
|
|
|
|
|
}
|
|
|
|
|
if (! $ENV{"DESTIBETARC"} || ! $ENV{"DESTISTABLE"})
|
|
|
|
|
{
|
|
|
|
|
print "Error: Missing environment variables.\n";
|
|
|
|
|
@@ -337,8 +344,8 @@ foreach my $target (sort keys %CHOOSEDPUBLISH) {
|
|
|
|
|
|
|
|
|
|
if ($nboftargetok) {
|
|
|
|
|
|
|
|
|
|
# Update CVS if required
|
|
|
|
|
#-----------------------
|
|
|
|
|
# Update GIT tag if required
|
|
|
|
|
#---------------------------
|
|
|
|
|
if ($nbofpublishneedtag)
|
|
|
|
|
{
|
|
|
|
|
print "Go to directory $SOURCE\n";
|
|
|
|
|
@@ -683,7 +690,7 @@ if ($nboftargetok) {
|
|
|
|
|
use Date::Language;
|
|
|
|
|
$lang=Date::Language->new('English');
|
|
|
|
|
$datestring = $lang->time2str("%a %b %e %Y", time);
|
|
|
|
|
$changelogstring="* ".$datestring." Laurent Destailleur $MAJOR.$MINOR.$REL1-$RPMSUBVERSION\n- Upstream release\n";
|
|
|
|
|
$changelogstring="* ".$datestring." Laurent Destailleur (eldy) $MAJOR.$MINOR.$REL1-$RPMSUBVERSION\n- Upstream release\n";
|
|
|
|
|
|
|
|
|
|
print "Generate file $BUILDROOT/$BUILDFIC from $SOURCE/build/rpm/${BUILDFICSRC}\n";
|
|
|
|
|
open (SPECFROM,"<$SOURCE/build/rpm/${BUILDFICSRC}") || die "Error";
|
|
|
|
|
@@ -805,8 +812,17 @@ if ($nboftargetok) {
|
|
|
|
|
print "Create directory $BUILDROOT/$PROJECT.tmp/debian\n";
|
|
|
|
|
$ret=`mkdir "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
print "Copy $SOURCE/build/debian/xxx to $BUILDROOT/$PROJECT.tmp/debian\n";
|
|
|
|
|
# Add files for dpkg-source (changelog)
|
|
|
|
|
#$ret=`cp -f "$SOURCE/build/debian/changelog" "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
open (SPECFROM,"<$SOURCE/build/debian/changelog") || die "Error";
|
|
|
|
|
open (SPECTO,">$BUILDROOT/$PROJECT.tmp/debian/changelog") || die "Error";
|
|
|
|
|
while (<SPECFROM>) {
|
|
|
|
|
$_ =~ s/__VERSION__/$MAJOR.$MINOR.$newbuild/;
|
|
|
|
|
print SPECTO $_;
|
|
|
|
|
}
|
|
|
|
|
close SPECFROM;
|
|
|
|
|
close SPECTO;
|
|
|
|
|
# Add files for dpkg-source
|
|
|
|
|
$ret=`cp -f "$SOURCE/build/debian/changelog" "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
$ret=`cp -f "$SOURCE/build/debian/compat" "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
$ret=`cp -f "$SOURCE/build/debian/control" "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
$ret=`cp -f "$SOURCE/build/debian/copyright" "$BUILDROOT/$PROJECT.tmp/debian"`;
|
|
|
|
|
|