bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-22 16:43:23 -05:00
Code Issues Projects Releases Wiki Activity

Spiffing things up so that packing making is simplified.

Browse Source
This commit is contained in:
freesource 2001-09-15 05:07:31 +00:00
parent fafd37f4a1
commit b291702b57
2 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
add-ons/yard/make-debian-X11/make_debian-X11
View File

@ -34,6 +34,7 @@ my $status = "/var/lib/dpkg/status";
my $info = "/var/lib/dpkg/info";
my (%alternatives, @alternatives); # for checking for alternatives
my %inetd; # checks for inetd binaries.
my $version = "1.0";
# You need file-rc, and you may add other extra stuff. These packages were
# chosen for woody, so you may need something different. If you add stuff,

20
add-ons/yard/make-debian-X11/make_debian-X11_pkg
View File

@ -8,7 +8,8 @@ use File::Find;
# needs to be run as root. The advantage of this program is that the
# archive will always represent the Makefile which is being tested
# when development isn't being done with perl -I . ./gbootroot.
# This program can be adapted for other packages.
# This program can be adapted for other packages, as long as $version is
# included in the program.
# This program uses dh-make, and copies your own defaults to
# $packaging_place/debian from your $packaging_defaults, and updates
@ -22,18 +23,21 @@ use File::Find;
# Makefile.pkg in $gbootroot_cvs in used as the packages Makefile.
my $user_home = "/home/mttrader";
my $prog = "gbootroot";
my $prog = "make-debian-X11";
my $prog_real_name = "make_debian-X11";
my $revision = 1;
my $dist = "unstable";
my $urgency = "low";
#my $arch = "all";
#my $group = "utils";
#my $priority = "optional";
my $gbootroot_cvs = "$user_home/gbootroot/gbootroot";
my $packaging_place = "$user_home/gbootroot/PACKAGING";
my $packaging_defaults = "$gbootroot_cvs/pkg/dpkg";
my $gbootroot_cvs =
"$user_home/gbootroot/gbootroot/add-ons/yard/make-debian-X11";
my $packaging_place = "$user_home/gbootroot/PACKAGING-debian-X11";
my $packaging_defaults = "$gbootroot_cvs/add-ons/yard/make-debian-X11/pkg";
my $email = "freesource\@users.sourceforge.net";
my $name = "Jonathan Rosenbaum";
my $makefile = "Makefile";
# Other vars
my ($real_uid, $real_gid) = (stat($user_home))[4,5];
@ -41,8 +45,8 @@ my ($real_uid, $real_gid) = (stat($user_home))[4,5];
# Find the version
my $version;
open(CVS, "$gbootroot_cvs/$prog") or
die "Couldn't find $prog in $gbootroot_cvs: $!\n";
open(CVS, "$gbootroot_cvs/$prog_real_name") or
die "Couldn't find $prog_real_name in $gbootroot_cvs: $!\n";
while (<CVS>) {
if (/\my \$version/) {
$version = (split(/=/,$_))[1];
@ -103,7 +107,7 @@ foreach (@make_lines) {
}
}
system "cp -fa Makefile.pkg $packaging_place/Makefile";
system "cp -fa $makefile $packaging_place/Makefile";
# Now we get to clean out any CVS directories and make sure that the
# permissions are all for the user who will be creating the package.