X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_gencontrol;h=08fb680a15c9fd206f895a0c060876fb0428aa44;hb=refs%2Ftags%2F6.0.0;hp=fcb91845a6957e8caf64c6ad6c651db7346e0349;hpb=088be5d001d899c42b9d572e91198791748e5b46;p=debhelper.git diff --git a/dh_gencontrol b/dh_gencontrol index fcb9184..08fb680 100755 --- a/dh_gencontrol +++ b/dh_gencontrol @@ -21,13 +21,13 @@ proper permissions. This program is merely a wrapper around L, which calls it once for each package being acted on, and passes in some additional -useful flags including "-isp". +useful flags. =head1 OPTIONS =over 4 -=item B<-u>I, B<--dpkg-gencontrol-params>I +=item B<-u>I, B<--dpkg-gencontrol-params>=I =item B<--> I @@ -53,19 +53,26 @@ foreach my $package (@{$dh{DOPACKAGES}}) { } # Generate and install control file. - doit("dpkg-gencontrol","-l$changelog","-isp","-p$package", - "-Tdebian/${ext}substvars", "-P$tmp",@{$dh{U_PARAMS}}); + my @command="dpkg-gencontrol"; + if (getpackages() > 1) { + push @command, "-p$package"; + } + if (is_udeb($package)) { + push @command, "-n".udeb_filename($package); + } + doit(@command, "-l$changelog", "-Tdebian/${ext}substvars", + "-P$tmp",@{$dh{U_PARAMS}}); # This chmod is only necessary if the user sets the umask to # something odd. doit("chmod","644","$tmp/DEBIAN/control"); - doit("chown","0.0","$tmp/DEBIAN/control"); + doit("chown","0:0","$tmp/DEBIAN/control"); } =head1 SEE ALSO -L +L This program is a part of debhelper.