dan/eufon
1
0
Fork 0
Code Issues Pull Requests Releases Activity

remove unused find fn

Browse Source
This commit is contained in:
Daniel Barlow 2022-04-03 12:34:53 +01:00
parent 6c6d7b0d18
commit 6b327d1f39
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
blinkenlicht/nl.fnl
View File

@ -5,9 +5,6 @@
(local nls (nl.socket)) (local nls (nl.socket))
(print "File descriptor:" (nls:fd)) (print "File descriptor:" (nls:fd))
;; when we have a default route, we get the ifname ;; when we have a default route, we get the ifname
;; $ grep DEVTYPE /sys/class/net/*/uevent ;; $ grep DEVTYPE /sys/class/net/*/uevent
@ -21,12 +18,7 @@
;; for wwan, need to determine how to get strength and carrier name ;; for wwan, need to determine how to get strength and carrier name
(fn find [predicate tbl]
(accumulate [found nil
_ el (ipairs tbl)]
(if (predicate el) el found)))
(print (find #(= $1 "hey") [:one :two :hey :three]))
(fn netlunk [] (fn netlunk []
(let [links {} (let [links {}