diff --git a/funcs.el b/funcs.el
index b083fbb..0a7e601 100644
--- a/funcs.el
+++ b/funcs.el
@@ -92,18 +92,7 @@ with."
                                                           t-correspondance-table)))
     (delete-region beg end)
     (goto-char beg)
-    (insert regionp)))
-
-(defun conlanging//find-elem-in-list (t-elem t-list)
-  "In a t-list containing lists, returns the element of `t-list'
-whose first element equals `t-elem'"
-  (if t-list
-      (if (string= (caar t-list)
-                   t-elem)
-          (car t-list)
-        (conlanging//find-elem-in-list t-elem
-                                       (cdr t-list)))
-    nil))
+    (insert new-regionp)))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
                                         ;                Mattér               ;