Browse Source

Don't fail on comment lines

blueprint: mos-xenial

Change-Id: I4e9a235956e5d08ab23a02ee52750e233da5f6d9
dmburmistrov 2 years ago
parent
commit
0486ff752f
1 changed files with 7 additions and 1 deletions
  1. 7
    1
      packages/deb/genpkgnames.pl

+ 7
- 1
packages/deb/genpkgnames.pl View File

@@ -1,7 +1,13 @@
1 1
 use Parse::DebControl;
2 2
 
3 3
 $parser = new Parse::DebControl;
4
- $data = $parser->parse_file($ARGV[0]);
4
+
5
+%options = (
6
+    type => 'debian/control',
7
+    stripComments => 'true',
8
+    );
9
+
10
+ $data = $parser->parse_file($ARGV[0], \%options);
5 11
  foreach my $a (@$data) {
6 12
      next if exists $a->{"Source"};
7 13
      print ${a}->{"Package"}."\n";

Loading…
Cancel
Save