From be2ae40b6d4e7bc076454f34a790121e109a5121 Mon Sep 17 00:00:00 2001
From: Francesc Guasch <frankie@etsetb.upc.edu>
Date: Wed, 8 Nov 2023 12:17:33 +0100
Subject: [PATCH] fix: do not insert network twice (#2005)

---
 lib/Ravada.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Ravada.pm b/lib/Ravada.pm
index c67845281..5a82c28a4 100644
--- a/lib/Ravada.pm
+++ b/lib/Ravada.pm
@@ -237,10 +237,11 @@ sub _add_internal_network($self) {
         ." VALUES(?,?,?,1,0)"
     );
     my $n=0;
+    my %done;
     for my $net (split /\n/,$out) {
         next if $net =~ /dev virbr/;
         my ($address) = $net =~ m{(^[\d\.]+/\d+)};
-        next if !$address;
+        next if !$address || $done{address}++;
         $sth->execute("internal$n",$address, ++$n+1);
 
     }