git.donarmstrong.com Git - debhelper.git/blob

   1 #!/usr/bin/perl -w
   2 #
   3 # Add to postinst and postrm to register a window manager.
   4
   5 BEGIN { push @INC, "debian", "/usr/share/debhelper" }
   6 use Dh_Lib;
   7 init();
   8
   9 $wm=shift;
  10
  11 if ($wm eq '') {
  12         error("No window manager filename was specified.");
  13 }
  14
  15 foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
  16 #       $TMP=tmpdir($PACKAGE);
  17
  18         if (! $dh{NOSCRIPTS}) {
  19                 autoscript($PACKAGE,"postinst","postinst-wm","s/#WM#/$wm/");
  20                 autoscript($PACKAGE,"postrm","postrm-wm","s/#WM#/$wm/");
  21         }
  22 }