blob: 21ee63006968ab55cb7f19dbf0a27d6d873c04b9 (
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/");
}
}
|