From 332fed0c0936a48b5cb68ebd7b2dc4d96003008e Mon Sep 17 00:00:00 2001
From: Akshay Nair <phenax5@gmail.com>
Date: Sun, 5 Oct 2025 15:28:56 +0530
Subject: Add opener script in config

---
 lib/Daffm/Configuration.hs | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'lib/Daffm/Configuration.hs')

diff --git a/lib/Daffm/Configuration.hs b/lib/Daffm/Configuration.hs
index a27d616..cc4749d 100644
--- a/lib/Daffm/Configuration.hs
+++ b/lib/Daffm/Configuration.hs
@@ -27,9 +27,14 @@ configurationCodec :: Toml.TomlCodec Configuration
 configurationCodec =
   Configuration
     <$> (keymapCodec "keymap" .= configKeymap)
+    <*> (openerCodec "opener" .= configOpener)
     <*> pure Map.empty .= configTheme
   where
-    keymapCodec = Toml.dimap (const Map.empty) toKeymap . keymapRawCodec
+    openerCodec = Toml.dioptional . Toml.text
+
+keymapCodec :: Toml.Key -> Toml.TomlCodec Keymap
+keymapCodec = Toml.dimap (const Map.empty) toKeymap . keymapRawCodec
+  where
     keymapRawCodec = Toml.tableMap Toml._KeyText Toml.text
     toKeymap = Map.fromList . map (bimap toKeys toCmd) . Map.toList
     toKeys = fromMaybe [] . parseKeySequence
-- 
cgit v1.3.1