Merge tag 'upstream/3.3.3'

[debian/amanda] / perl / Amanda / Script_App.pm

diff --git a/perl/Amanda/Script_App.pm b/perl/Amanda/Script_App.pm
index 0b8c3f992875f8db344be241ad0b6200de847639..63b7f3c668d969e3307cde6fdadde1b83d76bc04 100644 (file)
--- a/perl/Amanda/Script_App.pm
+++ b/perl/Amanda/Script_App.pm
@@ -1,9 +1,10 @@
 # vim:ft=perl
-# Copyright (c) 2008,2009 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
@@ -61,6 +62,7 @@ sub new {
        $execute_where = "client";
     }
     Amanda::Util::setup_application($name, $execute_where, $CONTEXT_DAEMON);
+    debug("Arguments: " . join(' ', @ARGV));
 
     #initialize config client to get values from amanda-client.conf
     config_init($CONFIG_INIT_CLIENT, undef);