Browse Source

Copies the initial control over, if it doesn't already exist.

master
freesource 24 years ago
parent
commit
ec7224c1b3
  1. 9
      add-ons/yard/make-debian-X11/make_debian-X11_pkg

9
add-ons/yard/make-debian-X11/make_debian-X11_pkg

@ -34,8 +34,7 @@ my $urgency = "low";
my $gbootroot_cvs = my $gbootroot_cvs =
"$user_home/gbootroot/gbootroot/add-ons/yard/make-debian-X11"; "$user_home/gbootroot/gbootroot/add-ons/yard/make-debian-X11";
my $packaging_place = "$user_home/gbootroot/PACKAGING-debian-X11"; my $packaging_place = "$user_home/gbootroot/PACKAGING-debian-X11";
my $packaging_defaults = my $packaging_defaults = "$gbootroot_cvs/pkg/dpkg";
"$gbootroot_cvs/add-ons/yard/make-debian-X11/pkg/dpkg";
my $email = "freesource\@users.sourceforge.net"; my $email = "freesource\@users.sourceforge.net";
my $name = "Jonathan Rosenbaum"; my $name = "Jonathan Rosenbaum";
my $makefile = "Makefile.pkg"; my $makefile = "Makefile.pkg";
@ -139,6 +138,11 @@ system "dh_make -e $email";
# Here we ask the user what changes to add to the changelog and set the proper # Here we ask the user what changes to add to the changelog and set the proper
# time using 822-date. If it is the initial release we don't do anything. # time using 822-date. If it is the initial release we don't do anything.
if ( !-e "$packaging_defaults/changelog" ) {
system
"cp -a $packaging_place/debian/changelog $packaging_defaults";
}
open(CHANGELOG,"$packaging_defaults/changelog") open(CHANGELOG,"$packaging_defaults/changelog")
or die "Couldn't open $packaging_place/changelog: $!\n"; or die "Couldn't open $packaging_place/changelog: $!\n";
my @changelog = <CHANGELOG>; my @changelog = <CHANGELOG>;
@ -175,6 +179,7 @@ if (!$stop) {
$count++; $count++;
} }
open(CHANGELOG,">$packaging_defaults/changelog") open(CHANGELOG,">$packaging_defaults/changelog")
or die "Couldn't open check: $!\n"; or die "Couldn't open check: $!\n";
for my $ct (0 .. ($#changelog - 3)) { for my $ct (0 .. ($#changelog - 3)) {

Loading…
Cancel
Save