]> git.donarmstrong.com Git - debhelper.git/blob - dh_installemacsen
r338: * Patch from Jorgen `forcer' Schaefer <forcer at mindless.com> (much
[debhelper.git] / dh_installemacsen
1 #!/usr/bin/perl -w
2 #
3 # Registration with emacsen-common.
4
5 use Debian::Debhelper::Dh_Lib;
6 init();
7
8 if (! defined $dh{PRIORITY}) {
9         $dh{PRIORITY}=50;
10 }
11 if (! defined $dh{FLAVOR}) {
12         $dh{FLAVOR}='emacs';
13 }
14
15 foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
16         $TMP=tmpdir($PACKAGE);
17
18         $emacsen_install=pkgfile($PACKAGE,"emacsen-install");
19         $emacsen_remove=pkgfile($PACKAGE,"emacsen-remove");
20         $emacsen_startup=pkgfile($PACKAGE,"emacsen-startup");
21
22         if ($emacsen_install ne '') {
23                 if (! -d "$TMP/usr/lib/emacsen-common/packages/install") {
24                         doit("install","-d","$TMP/usr/lib/emacsen-common/packages/install");
25                 }
26                 doit("install","-m0755",$emacsen_install,"$TMP/usr/lib/emacsen-common/packages/install/$PACKAGE");
27         }
28
29         if ($emacsen_remove ne '') {
30                 if (! -d "$TMP/usr/lib/emacsen-common/packages/remove") {
31                         doit("install","-d","$TMP/usr/lib/emacsen-common/packages/remove");
32                 }
33                 doit("install","-m0755","$emacsen_remove","$TMP/usr/lib/emacsen-common/packages/remove/$PACKAGE");
34         }
35         
36         if ($emacsen_startup ne '') {
37                 if (! -d "$TMP/etc/$dh{FLAVOR}/site-start.d/") {
38                         doit("install","-d","$TMP/etc/$dh{FLAVOR}/site-start.d/");
39                 }
40                 doit("install","-m0644",$emacsen_startup,"$TMP/etc/$dh{FLAVOR}/site-start.d/$dh{PRIORITY}$PACKAGE.el");
41         }
42
43         if ($emacsen_install ne '' || $emacsen_remove ne '') {
44                 if (! $dh{NOSCRIPTS}) {
45                         autoscript($PACKAGE,"postinst","postinst-emacsen",
46                                 "s/#PACKAGE#/$PACKAGE/");
47                         autoscript($PACKAGE,"prerm","prerm-emacsen",
48                                 "s/#PACKAGE#/$PACKAGE/");
49                 }
50         }
51 }