From dd4ab41f6ac4f76bca1d8132e9eb456f0e3f0818 Mon Sep 17 00:00:00 2001
From: Daniel Barlow <dan@telent.net>
Date: Wed, 6 Mar 2024 23:17:24 +0000
Subject: [PATCH] rename run-event

---
 pkgs/ifwait/ifwait.fnl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/pkgs/ifwait/ifwait.fnl b/pkgs/ifwait/ifwait.fnl
index d3b9c54..3677252 100644
--- a/pkgs/ifwait/ifwait.fnl
+++ b/pkgs/ifwait/ifwait.fnl
@@ -15,7 +15,7 @@
     [linkname nil] {:link linkname :expecting "present"}
     _  nil))
 
-(fn run-event [params v]
+(fn event-matches? [params v]
   (let [got
         (match v
           ;; - up: Reflects the administrative state of the interface (IFF_UP)
@@ -42,7 +42,7 @@
                  parameters.link " to be " parameters.expecting)))
 
     (each [e (event-fn)
-           &until (run-event parameters e)]
+           &until (event-matches? parameters e)]
       true)))
 
 (when (not (= (. arg 0) "test"))