From 9b10c6b9f9bfeb9ca3e4449ae8beb140e1b68ce0 Mon Sep 17 00:00:00 2001
From: Jacopo De Simoi <wilderkde@gmail.com>
Date: Fri, 8 Oct 2021 11:47:18 -0400
Subject: [PATCH] Define untarmak-key as a helper for other funs

---
 global.org | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/global.org b/global.org
index bd2c12e..8afcdd0 100644
--- a/global.org
+++ b/global.org
@@ -2293,6 +2293,9 @@ Set up all possible combinations of modifiers
                          modifier-combo))
                tarmak-current-swap-alist)))
 
+    (defun untarmak-key (char)
+      (let ((pair (rassoc char tarmak-current-swap-alist)))
+        (if pair (car pair) char)))
 
     (defun tarmak-avy ()
       (interactive)