pass command line params to run instead of reffing global
This commit is contained in:
@@ -32,18 +32,19 @@
|
||||
{})]
|
||||
(. got params.expecting)))
|
||||
|
||||
(fn run [event-fn]
|
||||
(fn run [args event-fn]
|
||||
(let [parameters
|
||||
(assert (parse-args arg)
|
||||
(.. "Usage: " (. arg 0) " [-v] ifname [present|up|running]"))]
|
||||
(assert (parse-args args)
|
||||
(.. "Usage: ifwait [-v] ifname [present|up|running]"))]
|
||||
(when parameters.verbose
|
||||
(print (.. (. arg 0) ": waiting for "
|
||||
(print (.. "ifwait: waiting for "
|
||||
parameters.link " to be " parameters.expecting)))
|
||||
|
||||
(each [e (event-fn)
|
||||
&until (run-event parameters e)]
|
||||
true)))
|
||||
|
||||
(when (not (= (. arg 0) "test")) (run #(nl.events {:link true})))
|
||||
(when (not (= (. arg 0) "test"))
|
||||
(run arg #(nl.events {:link true})))
|
||||
|
||||
{ : run }
|
||||
|
Reference in New Issue
Block a user