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