From 641f2ac47bded41e252ddc6437e2a58c6daa9280 Mon Sep 17 00:00:00 2001
From: Donald Buczek <buczek@molgen.mpg.de>
Date: Wed, 7 Dec 2022 08:50:38 +0100
Subject: [PATCH] mxproxmox: init credentials and api only as needed

---
 mxproxmox/mxproxmox | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/mxproxmox/mxproxmox b/mxproxmox/mxproxmox
index 72913e9..a8437af 100755
--- a/mxproxmox/mxproxmox
+++ b/mxproxmox/mxproxmox
@@ -264,26 +264,32 @@ sub cmd_tclient {
     sys(@cmd);
 }
 
-read_cred_file();
-init_ua();
-
 @ARGV >= 1 or die USAGE;
 my ($cmd,@rest) = shift;
 if ($cmd eq 'api') {
     @ARGV==1 or die USAGE;
+    read_cred_file();
+    init_ua();
     cmd_api(@ARGV);
 } elsif ($cmd eq 'local-backups') {
     @ARGV==0 or die USAGE;
+    read_cred_file();
+    init_ua();
     cmd_local_backups(@ARGV);
 } elsif ($cmd eq 'backup') {
     @ARGV==2 or die USAGE;
+    read_cred_file();
     cmd_backup(@ARGV);
 } elsif ($cmd eq 'client') {
+    read_cred_file();
     cmd_client(@ARGV);
 } elsif ($cmd eq 'tclient') {
+    read_cred_file();
     cmd_tclient(@ARGV);
 } elsif ($cmd eq 'active-jobs') {
     @ARGV==0 or die USAGE;
+    read_cred_file();
+    init_ua();
     cmd_active_jobs(@ARGV);
 } else {
     die USAGE;