summaryrefslogtreecommitdiff
path: root/dh_installwm
diff options
context:
space:
mode:
Diffstat (limited to 'dh_installwm')
-rwxr-xr-xdh_installwm104
1 files changed, 0 insertions, 104 deletions
diff --git a/dh_installwm b/dh_installwm
deleted file mode 100755
index 31ce63c6..00000000
--- a/dh_installwm
+++ /dev/null
@@ -1,104 +0,0 @@
-#!/usr/bin/perl -w
-
-=head1 NAME
-
-dh_installwm - register a window manager
-
-=cut
-
-use strict;
-use Debian::Debhelper::Dh_Lib;
-
-=head1 SYNOPSIS
-
-B<dh_installwm> [S<I<debhelper options>>] [B<-n>] [B<--priority=>I<n>] [S<I<wm ...>>]
-
-=head1 DESCRIPTION
-
-dh_installwm is a debhelper program that is responsible for
-generating the postinst and postrm commands that register a window manager
-with L<update-alternatives(8)>
-
-Any window manager programs specified as parameters will be registered in
-the first package dh_installwm is told to act on. By default, this is the
-first binary package in debian/control, but if you use -p, -i, or -a flags,
-it will be the first package specified by those flags.
-
-Files named debian/package.wm can list other window manager programs to
-register.
-
-=head1 OPTIONS
-
-=over 4
-
-=item B<--priority=>I<n>
-
-Set the priority of the window manager. Default is 20, which is too low for
-most window managers; see the Debian Policy document for instructions on
-calculating the correct value.
-
-=item B<-n>, B<--noscripts>
-
-Do not modify postinst/postrm scripts. Turns this command into a no-op.
-
-=item I<wm ...>
-
-The commands used to run the window manager or window managers you want to
-register.
-
-=head1 NOTES
-
-Note that this command is not idempotent. "dh_clean -k" should be called
-between invocations of this command. Otherwise, it may cause multiple
-instances of the same text to be added to maintainer scripts.
-
-=back
-
-=cut
-
-init();
-
-if (! defined $dh{PRIORITY}) {
- $dh{PRIORITY}=20;
-}
-
-if (@ARGV) {
- # This is here for backwards compatibility. If the filename doesn't
- # include a path, assume it's in /usr/X11R6/bin.
- if ($ARGV[0] !~ m:/:) {
- $ARGV[0]="/usr/X11R6/bin/$ARGV[0]";
- }
-}
-
-foreach my $package (@{$dh{DOPACKAGES}}) {
-# my $tmp=tmpdir($package);
- my $file=pkgfile($package,"wm");
-
- my @wm;
- if ($file) {
- @wm=filearray($file, '.');
- }
-
- if (($package eq $dh{FIRSTPACKAGE} || $dh{PARAMS_ALL}) && @ARGV) {
- push @wm, @ARGV;
- }
-
- if (! $dh{NOSCRIPTS}) {
- foreach (@wm) {
- autoscript($package,"postinst","postinst-wm","s:#WM#:$_:;s/#PRIORITY#/$dh{PRIORITY}/",);
- autoscript($package,"prerm","prerm-wm","s:#WM#:$_:");
- }
- }
-}
-
-=head1 SEE ALSO
-
-L<debhelper(7)>
-
-This program is a part of debhelper.
-
-=head1 AUTHOR
-
-Joey Hess <joeyh@debian.org>
-
-=cut