Imported Upstream version 3.2.0

[debian/amanda] / device-src / amdevcheck.pl

diff --git a/device-src/amdevcheck.pl b/device-src/amdevcheck.pl
index fe47f3a3352839b4720d441f041bdb2ddf9a11f3..9b8ccfe962469e9dffccd78235f7847152138a33 100644 (file)
--- a/device-src/amdevcheck.pl
+++ b/device-src/amdevcheck.pl
@@ -1,5 +1,5 @@
 #! @PERL@
-# Copyright (c) 2009 Zmanda, Inc.  All Rights Reserved.
+# Copyright (c) 2009, 2010 Zmanda, Inc.  All Rights Reserved.
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License version 2 as published
@@ -21,6 +21,7 @@ use lib '@amperldir@';
 use Getopt::Long;
 
 use strict;
+use warnings;
 use Amanda::Device qw( :constants );
 use Amanda::Config qw( :getconf :init );
 use Amanda::Debug qw( :logging );