From 4368f500c3e5438bf6ccba2433def3b93670a765 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Sun, 3 Jan 2021 19:56:47 +0100
Subject: [PATCH] ipv6-update: get old prefix from first matching address list
 entry

---
 ipv6-update | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ipv6-update b/ipv6-update
index ed266a6..34ed88c 100644
--- a/ipv6-update
+++ b/ipv6-update
@@ -22,7 +22,7 @@
   / ipv6 firewall address-list add list=("ipv6-pool-" . $Pool) address=:: comment=("ipv6-pool-" . $Pool);
   :set AddrList [ / ipv6 firewall address-list find where comment=("ipv6-pool-" . $Pool) ];
 }
-:local OldPrefix [ / ipv6 firewall address-list get $AddrList address ];
+:local OldPrefix [ / ipv6 firewall address-list get ($AddrList->0) address ];
 
 :if ($OldPrefix != $PdPrefix) do={
   :log info ("Updating IPv6 address list with new IPv6 prefix " . $PdPrefix);