From be8689853bcc1978306911b25c445352957de24a Mon Sep 17 00:00:00 2001
From: Andreas Suter <andreas.suter@psi.ch>
Date: Sun, 12 Jul 2020 11:24:57 +0200
Subject: [PATCH] musredit: check if system variables ROOTSYS and MUSRFITPATH
 are set, and if not popup a warning.

---
 src/musredit_qt5/musredit/PAdmin.cpp | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/src/musredit_qt5/musredit/PAdmin.cpp b/src/musredit_qt5/musredit/PAdmin.cpp
index 99182870..82b8399e 100644
--- a/src/musredit_qt5/musredit/PAdmin.cpp
+++ b/src/musredit_qt5/musredit/PAdmin.cpp
@@ -783,6 +783,24 @@ PAdmin::PAdmin() : QObject()
   } else {
     QMessageBox::critical(0, "ERROR", "musrfit not found.\nHave you set the necessary system variables properly?\nPlease check the manual.\nBefore you can use musrfit, this needs to be fixed.");
   }
+
+  // check if system variables are set properly
+  bool sysVarMissing = false;
+  QString msg("Missing System Variables:\n");
+  path = procEnv.value("ROOTSYS", "");
+  if (path.isEmpty()) {
+    msg += "> ROOTSYS\n";
+    sysVarMissing = true;
+  }
+  path = procEnv.value("MUSRFITPATH", "");
+  if (path.isEmpty()) {
+    msg += "> MUSRFITPATH\n";
+    sysVarMissing = true;
+  }
+  if (sysVarMissing) {
+    msg += "Please set this/these system variables.";
+    QMessageBox::warning(0, "WARNING", msg);
+  }
 }
 
 //--------------------------------------------------------------------------