Peppermint
/
debian-cd-clone
mirror of https://salsa.debian.org/images-team/debian-cd.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Minor logging changes

This commit is contained in:
Steve McIntyre 2008-07-18 12:17:19 +00:00
parent 0c8147027f
commit 73f31c1b5a
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
etch/tools/make_disc_trees.pl
View File

@ -421,20 +421,22 @@ sub start_disc {
if (defined ($ENV{"EXCLUDE"})) {
my $excl_file = $ENV{"EXCLUDE"};
print LOG "Adding excludes from $excl_file\n";
print LOG "Adding excludes from global exclude file $excl_file\n";
open (EXCLUDE_FILE, "< $excl_file") || die "Can't open exclude file $excl_file: $!\n";
while (defined (my $excl_pkg = <EXCLUDE_FILE>)) {
chomp $excl_pkg;
print LOG " $excl_pkg\n";
push(@exclude_packages, $excl_pkg);
}
close (EXCLUDE_FILE);
}
if (defined ($ENV{"EXCLUDE$disknum"})) {
my $excl_file = $ENV{"EXCLUDE$disknum"};
print LOG "Adding excludes from $excl_file\n";
print LOG "Adding excludes from disk $disknum exclude file $excl_file\n";
open (EXCLUDE_FILE, "< $excl_file") || die "Can't open exclude file $excl_file: $!\n";
while (defined (my $excl_pkg = <EXCLUDE_FILE>)) {
chomp $excl_pkg;
print LOG " $excl_pkg\n";
push(@exclude_packages, $excl_pkg);
}
close (EXCLUDE_FILE);