From 845b96c9a7f6d80f2042ef5d334fd6842d617f27 Mon Sep 17 00:00:00 2001
From: Akshay Nair <phenax5@gmail.com>
Date: Sun, 5 Oct 2025 16:46:13 +0530
Subject: Add stripping quotes for toml keys

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

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

diff --git a/lib/Daffm/Configuration.hs b/lib/Daffm/Configuration.hs
index cc4749d..afcca08 100644
--- a/lib/Daffm/Configuration.hs
+++ b/lib/Daffm/Configuration.hs
@@ -37,5 +37,6 @@ 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
+    toKeys = fromMaybe [] . parseKeySequence . stripQuotes
     toCmd = fromMaybe CmdNoop . parseCommand
+    stripQuotes txt = fromMaybe txt (Text.stripPrefix "\"" txt >>= Text.stripSuffix "\"")
-- 
cgit v1.3.1