chore(cli): added debug mode via BETTER_TMUX_DEBUG env

Author: vmarcosp

examples/index.tsx

@@ -34,7 +34,7 @@ export default {
   ],
   options:{
     setTitlesString: " ",
-    prefix: 'C-c'
+    prefix: 'C-a'
   },
   status: {
     left: <StatusLeft />,

packages/cli/src/core/Debug.res

@@ -0,0 +1,8 @@
+let log = (content) => {
+  let debugMode = Bun.Env.get(Bun.env, "BETTER_TMUX_DEBUG")
+  switch debugMode {
+  | Some("1") => Console.log2("[🔎 BetterTmux] Executing Command: ", content)
+  | Some(_)
+  | None => ()
+  }
+}

packages/cli/src/core/Tmux.res

@@ -56,4 +56,8 @@ let parse = command =>
   | Bind(key, command, options) => `tmux bind ${key} ${command} ${options->Array.join(" ")}`
   }
 
-let exec = command => command->parse->ChildProcess.execSync->ignore
+let exec = command => {
+  let parsedCommand = command->parse
+  Debug.log(parsedCommand)
+  parsedCommand->ChildProcess.execSync->ignore
+}