r178: Removed

diff --git a/debian/emacsen-install b/debian/emacsen-install
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/debian/emacsen-remove b/debian/emacsen-remove
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/debian/init.d b/debian/init.d
deleted file mode 100644 (file)
index e69de29..0000000

diff --git a/dh_getopt.pl b/dh_getopt.pl
deleted file mode 100755 (executable)
index bb7d513..0000000
--- a/dh_getopt.pl
+++ /dev/null
@@ -1,138 +0,0 @@
-#!/usr/bin/perl
-#
-# Because the getopt() program is so horribly broken, I wrote my own argument
-# processer that uses the find Getopt::Long module. This is used by all
-# debhelper scripts.
-#
-# Joey Hess, GPL copyright 1998.
-
-# Returns a list of packages in the control file.
-# Must pass "arch" or "indep" to specify arch-dependant or -independant
-# packages.
-sub GetPackages { $type=shift;
-       my $package;
-       my $arch;
-       my @list;
-       open (CONTROL,"<debian/control") || 
-               ( $parse_error="cannot read debian/control: $!\n" );
-       while (<CONTROL>) {
-               chomp;
-               s/\s+$//;
-               if (/^Package:\s+(.*)/) {
-                       $package=$1;
-               }
-               if (/^Architecture:\s+(.*)/) {
-                       $arch=$1;
-               }
-               if (!$_ or eof) { # end of stanza.
-                       if ($package &&
-                           (($type eq 'indep' && $arch eq 'all') ||
-                                  ($type eq 'arch' && $arch ne 'all'))) {
-                               push @list, $package;
-                               undef $package, $arch;
-                       }
-               }
-       }
-       close CONTROL;
-
-       return @list;
-}
-
-# Passed an option name and an option value, adds packages to the list
-# of packages. We need this so the list will be built up in the right
-# order.
-sub AddPackage { my($option,$value)=@_;
-       if ($option eq 'i' or $option eq 'indep') {
-               push @packages, GetPackages('indep');
-               $indep=1;
-       }
-       elsif ($option eq 'a' or $option eq 'arch') {
-               push @packages, GetPackages('arch');
-               $arch=1;
-       }
-       elsif ($option eq 'p' or $option eq 'package') {
-               push @packages, $value;
-       }
-       else {
-               $parse_error="bad option $option - should never happen!\n";
-       }
-}
-
-use Getopt::Long;
-
-# Enable bundling of short command line options.
-Getopt::Long::config("bundling");
-
-# Parse options.
-GetOptions(
-       "v" => \$verbose,
-       "verbose" => \$verbose,
-
-       "i" => \&AddPackage,
-       "indep" => \&AddPackage,
-
-       "a" => \&AddPackage,
-       "arch" => \&AddPackage,
-
-       "p=s" => \&AddPackage,
-  "package=s" => \&AddPackage,
-
-       "n" => \$noscripts,
-       "noscripts" => \$noscripts,
-
-       "x" => \$include, # is -x for some unknown historical reason..
-       "include-conffiles" => \$include,
-       
-       "d" => \$d_flag,
-       "remove-d" => \$d_flag,
-
-       "r" => \$r_flag,
-       "no-restart-on-upgrade" => \$r_flag,
-
-       "k" => \$k_flag,
-       "keep" => \$k_flag,
-
-       "P=s" => \$tmpdir,
-       "tmpdir=s" => \$tmpdir,
-
-       "u=s", => \$u_params,
-       "update-rcd-params=s", => \$u_params,
-  "dpkg-shlibdeps-params=s", => \$u_params,
-
-       "m=s", => \$major,
-       "major=s" => \$major,
-
-       "V:s", => \$version_info,
-       "version-info:s" => \$version_info,
-
-       "A" => \$all,
-       "all" => \$all,
-);
-
-# Check to see if -V was specified. If so, but no parameters were passed,
-# the variable will be defined but empty.
-if (defined($version_info)) {
-       $version_info_set=1;
-}
-
-# Now output everything, in a format suitable for a shell to eval it. 
-# Note the last line sets $@ in the shell to whatever arguements remain.
-print qq{
-DH_VERBOSE='$verbose'
-DH_DOPACKAGES='@packages'
-DH_DOINDEP='$indep'
-DH_DOARCH='$arch'
-DH_NOSCRIPTS='$noscripts'
-DH_EXCLUDE='$include'
-DH_D_FLAG='$d_flag'
-DH_R_FLAG='$r_flag'
-DH_K_FLAG='$k_flag'
-DH_TMPDIR='$tmpdir'
-DH_U_PARAMS='$u_params'
-DH_M_PARAMS='$major'
-DH_V_FLAG='$version_info'
-DH_V_FLAG_SET='$version_info_set'
-DH_PARAMS_ALL='$all'
-DH_PARSE_ERROR='$parse_error'
-set -- @ARGV
-};

diff --git a/dh_lib b/dh_lib
deleted file mode 100644 (file)
index d926639..0000000
--- a/dh_lib
+++ /dev/null
@@ -1,50 +0,0 @@
-# Library functions for debhelper programs.
-
-# Run a command, and display the command to stdout if verbose mode is on.
-# All commands that edit debian/tmp should be ran via this function.
-function doit() {
-       verbose_echo "$1"
-       $1
-}
-
-# Echo something if the verbose flag is on.
-function verbose_echo() {
-       if [ "$DH_VERBOSE" ]; then
-               echo "  $1"
-       fi
-}
-
-# Echo an error message and exit.
-function error() {
-       echo `basename $0`": $1" >&2
-       exit 1
-}
-
-# Argument processing and global variable initialization is below.
-
-# Get the package name and version from the changelog.
-LINE=`head -1 debian/changelog`
-PACKAGE=`expr "$LINE" : '\(.*\) (.*)'`
-VERSION=`expr "$LINE" : '.* (\(.*\))'`
-
-# Is this a native Debian package?
-if ! expr "$VERSION" : '.*-' >/dev/null; then
-               NATIVE=1
-fi
-
-# Parse command line.
-set -- `getopt v $*` 
-
-for i; do
-       case "$i"
-       in
-               -v)
-                       DH_VERBOSE=1
-                       shift
-                       ;;
-               --)
-                       shift
-                       break
-                       ;;
-       esac
-done