Imported Upstream version 3.2.0

[debian/amanda] / installcheck / Installcheck.pm

diff --git a/installcheck/Installcheck.pm b/installcheck/Installcheck.pm
index 291ef932e37542f16858578b9719488c94948536..7d8cf361ecc6119ec2952eb539a148b3d81888bc 100644 (file)
--- a/installcheck/Installcheck.pm
+++ b/installcheck/Installcheck.pm
@@ -64,11 +64,18 @@ eventual use.
 use strict;
 use warnings;
 use Socket;
+require Exporter;
+
+our @ISA = qw(Exporter);
+our @EXPORT = qw( $srcdir );
 
 use Amanda::Util;
 
 our $TMP = "$AMANDA_TMPDIR/installchecks";
 
+# the Makefile provides srcdir to us in most cases; if not, assume it's "."
+our $srcdir = $ENV{'srcdir'} || '.';
+
 # run this just before the script actually executes
 # (not during syntax checks)
 INIT {