fix: setting socket path env

- setting CARDANO_NODE_SOCKET_PATH env during bot interface setup

Author: mikekeke

src/BotInterface/Setup.hs

@@ -7,9 +7,11 @@ module BotInterface.Setup (
   txsDir,
 ) where
 
+import Cardano.Launcher.Node
 import Data.Aeson (encodeFile)
-import LocalCluster.Types (ClusterEnv (supportDir))
+import LocalCluster.Types (ClusterEnv (supportDir), nodeSocket)
 import System.Directory (createDirectoryIfMissing, doesDirectoryExist)
+import System.Environment (setEnv)
 import System.FilePath ((</>))
 import Tools.CardanoApi (queryProtocolParams)
 
@@ -30,7 +32,10 @@ runSetup :: ClusterEnv -> IO ()
 runSetup cEnv = do
   createRequiredDirs
   saveProtocolParams
+  setSocketPathEnv
   where
+    setSocketPathEnv =
+      setEnv "CARDANO_NODE_SOCKET_PATH" (nodeSocketFile $ nodeSocket cEnv)
     createRequiredDirs =
       mapM_
         (createDirectoryIfMissing True . ($ cEnv))