summaryrefslogtreecommitdiff
path: root/dh_installemacsen
diff options
context:
space:
mode:
authorjoey <joey>1999-08-17 05:02:56 +0000
committerjoey <joey>1999-08-17 05:02:56 +0000
commit5501271678d88ac578082ce2d0705ca211d7e980 (patch)
tree5c0e969ea02c1ad7dae038d699fc9acc4d67b423 /dh_installemacsen
parentf52118bc1737140efeee4b56c3ab92ac3c54a61e (diff)
downloaddebhelper-5501271678d88ac578082ce2d0705ca211d7e980.tar.gz
r132: Initial Import
Diffstat (limited to 'dh_installemacsen')
-rwxr-xr-xdh_installemacsen57
1 files changed, 29 insertions, 28 deletions
diff --git a/dh_installemacsen b/dh_installemacsen
index 008d9531..79c7dda9 100755
--- a/dh_installemacsen
+++ b/dh_installemacsen
@@ -1,36 +1,37 @@
-#!/bin/sh -e
+#!/usr/bin/perl -w
#
# Registration with emacsen-common.
-PATH=debian:$PATH:/usr/lib/debhelper
-. dh_lib
+BEGIN { push @INC, "debian", "/usr/lib/debhelper" }
+use Dh_Lib;
+init();
-for PACKAGE in $DH_DOPACKAGES; do
- TMP=`tmpdir $PACKAGE`
+foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
+ $TMP=tmpdir($PACKAGE);
- emacsen_install=`pkgfile $PACKAGE emacsen-install`
- emacsen_remove=`pkgfile $PACKAGE emacsen-remove`
+ $emacsen_install=pkgfile($PACKAGE,"emacsen-install");
+ $emacsen_remove=pkgfile($PACKAGE,"emacsen-remove");
- if [ "$emacsen_install" ]; then
- if [ ! -d "$TMP/usr/lib/emacsen-common/packages/install" ]; then
- doit "install -d $TMP/usr/lib/emacsen-common/packages/install"
- fi
- doit "install $emacsen_install $TMP/usr/lib/emacsen-common/packages/install/$PACKAGE"
- fi
+ if ($emacsen_install ne '') {
+ if (! -d "$TMP/usr/lib/emacsen-common/packages/install") {
+ doit("install","-d","$TMP/usr/lib/emacsen-common/packages/install");
+ }
+ doit("install",$emacsen_install,"$TMP/usr/lib/emacsen-common/packages/install/$PACKAGE");
+ }
- if [ "$emacsen_remove" ]; then
- if [ ! -d "$TMP/usr/lib/emacsen-common/packages/remove" ]; then
- doit "install -d $TMP/usr/lib/emacsen-common/packages/remove"
- fi
- doit "install $emacsen_remove $TMP/usr/lib/emacsen-common/packages/remove/$PACKAGE"
- fi
+ if ($emacsen_remove ne '') {
+ if (! -d "$TMP/usr/lib/emacsen-common/packages/remove") {
+ doit("install","-d","$TMP/usr/lib/emacsen-common/packages/remove");
+ }
+ doit("install","$emacsen_remove","$TMP/usr/lib/emacsen-common/packages/remove/$PACKAGE");
+ }
- if [ "$emacsen_install" -o "$emacsen_remove" ]; then
- if [ ! "$DH_NOSCRIPTS" ]; then
- autoscript "postinst" "postinst-emacsen" \
- "s/#PACKAGE#/$PACKAGE/"
- autoscript "prerm" "prerm-emacsen" \
- "s/#PACKAGE#/$PACKAGE/"
- fi
- fi
-done
+ if ($emacsen_install ne '' || $emacsen_remove ne '') {
+ if (! $dh{NOSCRIPTS}) {
+ autoscript($PACKAGE,"postinst","postinst-emacsen",
+ "s/#PACKAGE#/$PACKAGE/");
+ autoscript($PACKAGE,"prerm","prerm-emacsen",
+ "s/#PACKAGE#/$PACKAGE/");
+ }
+ }
+}