Deleted conlanging//find-elem-in-list
Removed unused function
This commit is contained in:
parent
3e27453523
commit
b9fff85970
13
funcs.el
13
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 ;
|
||||
|
Reference in New Issue
Block a user