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

add debug for unstable tasks pkgs

This commit is contained in:
Steve McIntyre 2012-07-08 18:37:42 +00:00
parent 0feb53ab54
commit 281dd7f076
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tools/sort_deps
View File

@ -99,6 +99,7 @@ close AVAIL or die "apt-cache failed : $@ ($!)\n";
# Read in the extra (new/unstable) tasks packages # Read in the extra (new/unstable) tasks packages
if ($force_unstable_tasks) { if ($force_unstable_tasks) {
my $num = 0;
if ($tasks_packages =~ /\.gz$/) { if ($tasks_packages =~ /\.gz$/) {
open(AVAIL, "zcat $tasks_packages |") || die "Can't zcat $tasks_packages : $!\n"; open(AVAIL, "zcat $tasks_packages |") || die "Can't zcat $tasks_packages : $!\n";
} else { } else {
@ -108,9 +109,11 @@ if ($force_unstable_tasks) {
next if not m/^Package: (\S+)\s*$/m; next if not m/^Package: (\S+)\s*$/m;
if ($1 =~ /^task-/) { if ($1 =~ /^task-/) {
parse_package($_); parse_package($_);
$num++;
} }
} }
close AVAIL or die "reading unstable tasks failed : $@ ($!)\n"; close AVAIL or die "reading unstable tasks failed : $@ ($!)\n";
msg(0, " Read $num tasks packages fro $tasks_packages\n");
} }
$/ = $oldrs; $/ = $oldrs;