forked from dan/liminix
remove dead code
This commit is contained in:
parent
afcc6a6436
commit
f0f6cc80d7
@ -1,5 +1,4 @@
|
||||
(local { : opendir : readdir } (require :lualinux))
|
||||
(local { : view } (require :fennel))
|
||||
|
||||
(fn fail [err]
|
||||
(print "ERROR" err)
|
||||
@ -23,9 +22,6 @@
|
||||
(values filename filename)))
|
||||
(nil err) (fail (.. "can't open " dir " :" err))))
|
||||
|
||||
(fn stopped-services []
|
||||
(popen (.. "s6-rc -da list")))
|
||||
|
||||
(fn stopped-controlled-services [dir]
|
||||
(let [controlled (controlled-services dir)]
|
||||
(with-popen [h (.. "s6-rc -b -da list")]
|
||||
|
Loading…
Reference in New Issue
Block a user