From 7a4caab5a546be4b1e7526adfa322f18e634097c Mon Sep 17 00:00:00 2001 From: MikeMaximus Date: Sun, 9 Sep 2018 11:04:02 -0600 Subject: [PATCH] FIxed broken custom variable feature --- GBM/Managers/mgrPath.vb | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/GBM/Managers/mgrPath.vb b/GBM/Managers/mgrPath.vb index 5bf13ae..3eff9e3 100644 --- a/GBM/Managers/mgrPath.vb +++ b/GBM/Managers/mgrPath.vb @@ -341,6 +341,13 @@ Public Class mgrPath Dim sEnvAppDataRoaming As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) Dim sHomeDir As String = "${HOME}" Dim sEnvCurrentUser As String = Environment.GetFolderPath(Environment.SpecialFolder.UserProfile) + Dim oCustomVariable As clsPathVariable + + For Each oCustomVariable In hshCustomVariables.Values + If sValue.Contains(oCustomVariable.FormattedName) Then + Return sValue.Replace(oCustomVariable.FormattedName, oCustomVariable.Path) + End If + Next If mgrCommon.IsUnix Then '$VAR_iable