3 # Integration with xaw-wrappers
5 # If debian/xaw-wrappers file exists, save it to
6 # $tmp/usr/share/xaw-wrappers/config/$package
8 # Also, add calls to postinst and postrm.
11 use Debian::Debhelper::Dh_Lib;
14 foreach my $package (@{$dh{DOPACKAGES}}) {
15 my $tmp=tmpdir($package);
16 my $xaw=pkgfile($package,'xaw');
19 if (! -d "$tmp/usr/share/xaw-wrappers/config") {
20 doit("install","-d","$tmp/usr/share/xaw-wrappers/config");
22 doit("install","-p","-m644",$xaw,
23 "$tmp/usr/share/xaw-wrappers/config/$package");
25 if (! $dh{NOSCRIPTS}) {
26 # Parse the xaw conf file to figure out what programs
27 # and link names are present in it. Have to pass
28 # those into the scripts.
39 if (/(.*?):\s?(.*)/) {
44 $install_opts.="'$data{program} $data{'link-name'} $data{wrapped}' ";
45 $remove_opts.="'$data{'link-name'} $data{wrapped}' ";
54 $install_opts.="'$data{program} $data{'link-name'} $data{wrapped}'";
55 $remove_opts.="'$data{'link-name'} $data{wrapped}'";
58 autoscript($package,"postinst","postinst-xaw",
59 "s:#OPTS#:$install_opts:");
60 autoscript($package,"prerm","prerm-xaw",
61 "s:#OPTS#:$remove_opts:");
62 autoscript($package,"postrm","postrm-xaw");