X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=dh_installdeb;h=fdc76e60e8c114feac1a8b85d6282d2171326724;hb=f30b9b0eb32de701d878ac42a2d425f89bc34710;hp=e25e17530fa89696d539bdb83073727db8351680;hpb=1f56418d00a8f406f53b06f3f0b1566e56c1feca;p=debhelper.git diff --git a/dh_installdeb b/dh_installdeb index e25e175..fdc76e6 100755 --- a/dh_installdeb +++ b/dh_installdeb @@ -27,6 +27,7 @@ the DEBIAN directory: package.prerm package.shlibs package.conffiles + package.triggers The postinst, preinst, postrm, and prerm are handled specially: If a corresponding file named debian/package.script.debhelper exists, the contents @@ -46,53 +47,39 @@ init(); foreach my $package (@{$dh{DOPACKAGES}}) { my $tmp=tmpdir($package); - my $ext=pkgext($package); if (! -d "$tmp/DEBIAN") { doit("install","-o",0,"-g",0,"-d","$tmp/DEBIAN"); } - # Install debian install scripts. - # If any .debhelper files exist, add them into the scripts. - foreach my $file (qw{postinst preinst prerm postrm}) { - my $f=pkgfile($package,$file); + if (is_udeb($package)) { + # For udebs, only do the postinst, and no #DEBHELPER#. + my $f=pkgfile($package,"postinst"); if ($f) { - if (-f "debian/$ext$file.debhelper") { - # Add this into the script, where it has - # #DEBHELPER# - complex_doit("perl -pe 's~#DEBHELPER#~qx{cat debian/$ext$file.debhelper}~eg' < $f > $tmp/DEBIAN/$file"); - } - else { - # Just get rid of any #DEBHELPER# in the - # script. - complex_doit("sed s/#DEBHELPER#// < $f > $tmp/DEBIAN/$file"); - } - doit("chown","0:0","$tmp/DEBIAN/$file"); - doit("chmod",755,"$tmp/DEBIAN/$file"); - } - else { - # Auto-generate script header and add .debhelper - # content to it. - if (-f "debian/$ext$file.debhelper") { - complex_doit("printf '#!/bin/sh\nset -e\n' > $tmp/DEBIAN/$file"); - complex_doit("cat debian/$ext$file.debhelper >> $tmp/DEBIAN/$file"); - doit("chown","0:0","$tmp/DEBIAN/$file"); - doit("chmod",755,"$tmp/DEBIAN/$file"); - } + doit("install", "-o", 0, "-g", 0, "-m", 755, + $f, "$tmp/DEBIAN/postinst"); } + next; + } + + # Install debian scripts. + foreach my $script (qw{postinst preinst prerm postrm}) { + debhelper_script_subst($package, $script); } - # Install non-executable files - foreach my $file (qw{shlibs conffiles}) { - my $f=pkgfile($package,$file); - if ($f) { - doit("install","-o",0,"-g",0,"-m",644,"-p",$f,"$tmp/DEBIAN/$file"); + if (! is_udeb($package)) { + # Install non-executable files + foreach my $file (qw{shlibs conffiles triggers}) { + my $f=pkgfile($package,$file); + if ($f) { + doit("install","-o",0,"-g",0,"-m",644,"-p",$f,"$tmp/DEBIAN/$file"); + } } } # Automatic conffiles registration: If it is in /etc, it is a # conffile. - if (! compat(2) && -d "$tmp/etc") { + if (! compat(2) && -d "$tmp/etc" && ! is_udeb($package)) { complex_doit("find $tmp/etc -type f -printf '/etc/%P\n' >> $tmp/DEBIAN/conffiles"); # Anything found? if (-z "$tmp/DEBIAN/conffiles") {