From 8cc1763237f9f12d25cf00735ce63c5655877899 Mon Sep 17 00:00:00 2001
From: Akshay Nair <phenax5@gmail.com>
Date: Sun, 5 Oct 2025 20:21:13 +0530
Subject: Add CmdChain to run commands sequentially in keys

---
 lib/Daffm/Action/Core.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/Daffm/Action/Core.hs')

diff --git a/lib/Daffm/Action/Core.hs b/lib/Daffm/Action/Core.hs
index f80e41a..a8dad32 100644
--- a/lib/Daffm/Action/Core.hs
+++ b/lib/Daffm/Action/Core.hs
@@ -65,8 +65,8 @@ cmdSubstitutions cmd = do
   let selections = Set.elems stateFileSelections
   let selectionsOrCurrent = if Set.null stateFileSelections then [file] else selections
   let subst =
-        Text.replace "%" file
-          . Text.replace "%d" stateCwd
+        Text.replace "%" (escape file)
+          . Text.replace "%d" (escape stateCwd)
           . Text.replace "%s" (Text.unwords $ map escape selections)
           . Text.replace "%S" (Text.dropWhileEnd (== '\n') $ Text.unlines selections)
           . Text.replace "%f" (Text.unwords $ map escape selectionsOrCurrent)
-- 
cgit v1.3.1