Set the TUXMCD_DEBUG env. var for VFS loggingv0.6.79

In case tuxcmd is started with the --debug switch, set
the TUXMCD_DEBUG env. var that is later picked up by modules.

1 files changed, 2 insertions, 0 deletions

diff --git a/vfs/UVFSCore.pas b/vfs/UVFSCore.pas
index b39ad8e..e7d63a2 100644
--- a/vfs/UVFSCore.pas
+++ b/vfs/UVFSCore.pas
@@ -1121,6 +1121,8 @@ end;
 
 procedure DoInitPlugins;
 begin
+  if ParamDebug then
+    setenv('TUXCMD_DEBUG', '1', 1);
   PluginList := TList.Create;
   if not ParamDisablePlugins then begin
     BinaryPath := GetBinaryPath;