diff options
| author | Guillem Jover <guillem@debian.org> | 2007-08-31 05:31:26 +0300 |
|---|---|---|
| committer | Guillem Jover <guillem@debian.org> | 2007-08-31 05:32:45 +0300 |
| commit | d8ce44bf7cee58d66601b23f782af0eac8f062ac (patch) | |
| tree | fb46654b8c0839e29c12c3c6bcae59aa5473d414 /scripts/dpkg-gencontrol.pl | |
| parent | d9fa5a8a2bedbccd5c3d976a27ba550b2bcfa20d (diff) | |
| download | dpkg-d8ce44bf7cee58d66601b23f782af0eac8f062ac.tar.gz | |
Implement support for Tag field
Diffstat (limited to 'scripts/dpkg-gencontrol.pl')
| -rwxr-xr-x | scripts/dpkg-gencontrol.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/dpkg-gencontrol.pl b/scripts/dpkg-gencontrol.pl index 8ff8aee27..92052fc83 100755 --- a/scripts/dpkg-gencontrol.pl +++ b/scripts/dpkg-gencontrol.pl @@ -23,7 +23,7 @@ textdomain("dpkg-dev"); my @control_fields = (qw(Package Source Version Architecture Essential Origin Bugs Maintainer Installed-Size), @pkg_dep_fields, - qw(Section Priority Homepage Description)); + qw(Section Priority Homepage Description Tag)); my $controlfile = 'debian/control'; my $changelogfile = 'debian/changelog'; @@ -161,7 +161,7 @@ for $_ (keys %fi) { else { $_ = "C $_"; &unknown(_g('general section of control info file')); } } elsif (s/^C$myindex //) { #print STDERR "P key >$_< value >$v<\n"; - if (m/^(Package|Description|Homepage|Essential|Optional)$/) { + if (m/^(Package|Description|Homepage|Tag|Essential|Optional)$/) { $f{$_}= $v; } elsif (exists($pkg_dep_fields{$_})) { # Delay the parsing until later |