linux: re-enable udeb building
This commit is contained in:
parent
fb2e8b9b8e
commit
67b24bfa7c
267 changed files with 1891 additions and 1 deletions
26
helpers/DATA/linux/kernel-wedge-arch.pl
Executable file
26
helpers/DATA/linux/kernel-wedge-arch.pl
Executable file
|
|
@ -0,0 +1,26 @@
|
|||
#!/usr/bin/perl
|
||||
#
|
||||
# kernel-wedge-arch.pl -- select only specifiers for the supplied arch.
|
||||
#
|
||||
use strict;
|
||||
|
||||
require Dpkg::Control;
|
||||
require Dpkg::Deps;
|
||||
|
||||
my $fh = \*STDIN;
|
||||
|
||||
my @entries;
|
||||
|
||||
my $wanted = $ARGV[0];
|
||||
|
||||
my $entry;
|
||||
while (!eof($fh)) {
|
||||
$entry = Dpkg::Control->new();
|
||||
$entry->parse($fh, '???');
|
||||
|
||||
if ($entry->{'Architecture'} eq $wanted) {
|
||||
print("\n" . $entry);
|
||||
}
|
||||
}
|
||||
|
||||
close($fh);
|
||||
Loading…
Add table
Add a link
Reference in a new issue