liminix

commit 4bd3ccc8fd2c90721db69dcd35fdca279e95c2b8
parent 3e163d4253bcb81542243d4510fe29100b03925f
Author: Daniel Barlow <dan@telent.net>
Date:   Fri,  8 Sep 2023 16:49:09 +0100

inline write-{addresses,prefixes}

Diffstat:
M
pkgs/odhcp-script/odhcp6-script.fnl
 | 
10
+++-------

1 file changed, 3 insertions(+), 7 deletions(-)
diff --git a/pkgs/odhcp-script/odhcp6-script.fnl b/pkgs/odhcp-script/odhcp6-script.fnl
@@ -34,11 +34,6 @@
       (each [k v (pairs address)]
         (write-value (.. keydir "/" k) v)))))
 
-(fn write-addresses [addresses]
-  (write-addresses-thing "address/" addresses))
-
-(fn write-prefixes [prefixes]
-  (write-addresses-thing "prefix/" prefixes))
 
 ;; we remove state before updating to ensure that consumers don't get
 ;; a half-updated snapshot
@@ -79,8 +74,9 @@
        ]]
   (each [_ n (ipairs wanted)]
     (write-value-from-env n))
-  (write-addresses (os.getenv :ADDRESSES))
-  (write-prefixes (os.getenv :PREFIXES)))
+
+  (write-addresses-thing "address/" (os.getenv :ADDRESSES))
+  (write-addresses-thing "prefix/" (os.getenv :PREFIXES)))
 
 (let [[ifname state] arg
       ready (match state