From b9fff859703558c248412de18e8567111d49a8c8 Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Wed, 25 Mar 2020 12:27:56 +0100 Subject: [PATCH] Deleted `conlanging//find-elem-in-list` Removed unused function --- funcs.el | 13 +------------ 1 file changed, 1 insertion(+), 12 deletions(-) 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 ;