Imported Upstream version 3.3.1

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

diff --git a/device-src/amdevcheck.pl b/device-src/amdevcheck.pl
index 03c50f2dc5e2c79fb906c1cc9a5ef3b41c060760..78392643d378bc6d555307cd3c2a8b56121ed19f 100644 (file)
--- a/device-src/amdevcheck.pl
+++ b/device-src/amdevcheck.pl
@@ -93,8 +93,10 @@ my $getproplist;
 my $device_name;
 my $print_label;
 
+debug("Arguments: " . join(' ', @ARGV));
 Getopt::Long::Configure(qw(bundling));
 GetOptions(
+    'version' => \&Amanda::Util::version_opt,
     'help|usage|?' => \&usage,
     'o=s' => sub { add_config_override_opt($config_overrides, $_[1]); },
     'properties:s' => \$getproplist,