Imported Upstream version 3.3.3

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

diff --git a/device-src/amtapetype.pl b/device-src/amtapetype.pl
index bbc7d32aa34e0a8572b0aedb2f3c54a75e294734..1a817b494e98f4f1134ddf2215fddf5ff2fbb75e 100644 (file)
--- a/device-src/amtapetype.pl
+++ b/device-src/amtapetype.pl
@@ -1,9 +1,10 @@
 #! @PERL@
-# Copyright (c) 2008, 2009, 2010 Zmanda, Inc.  All Rights Reserved.
+# Copyright (c) 2008-2012 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
-# by the Free Software Foundation.
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
 #
 # This program is distributed in the hope that it will be useful, but
 # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
@@ -671,8 +672,10 @@ config_init(0, undef);
 
 my $config_overrides = new_config_overrides($#ARGV+1);
 
+debug("Arguments: " . join(' ', @ARGV));
 Getopt::Long::Configure(qw(bundling));
 GetOptions(
+    'version' => \&Amanda::Util::version_opt,
     'help|usage|?|h' => \&usage,
     'c' => \$opt_only_compression,
     'b=s' => sub {