From a98459b6d86ecfd01258cac829e540795f02cd59 Mon Sep 17 00:00:00 2001
From: Francesc Guasch <frankie@etsetb.upc.edu>
Date: Fri, 4 Oct 2024 11:04:19 +0200
Subject: [PATCH] wip: we need init now to create local_groups table

---
 t/40_auth_sql.t      | 1 +
 t/lib/Test/Ravada.pm | 1 +
 t/user/10_domains.t  | 1 +
 t/user/35_share.t    | 1 +
 4 files changed, 4 insertions(+)

diff --git a/t/40_auth_sql.t b/t/40_auth_sql.t
index a058340d8..24d2b7ae2 100644
--- a/t/40_auth_sql.t
+++ b/t/40_auth_sql.t
@@ -10,6 +10,7 @@ use Test::Ravada;
 use_ok('Ravada');
 use_ok('Ravada::Auth::SQL');
 
+init();
 my $RAVADA = rvd_back();
 
 Ravada::Auth::SQL::add_user(name => 'test',password => $$);
diff --git a/t/lib/Test/Ravada.pm b/t/lib/Test/Ravada.pm
index b2f87cc0f..a1776d586 100644
--- a/t/lib/Test/Ravada.pm
+++ b/t/lib/Test/Ravada.pm
@@ -1597,6 +1597,7 @@ sub _qemu_storage_pool {
 sub remove_void_networks($vm=undef) {
     if (!defined $vm) {
         eval { $vm = rvd_back->search_vm('Void') };
+        die $@ if $@;
     }
     my $dir_net = $vm->dir_img()."/networks";
     return if ! -e $dir_net;
diff --git a/t/user/10_domains.t b/t/user/10_domains.t
index 2d16597e4..0490c76f7 100644
--- a/t/user/10_domains.t
+++ b/t/user/10_domains.t
@@ -11,6 +11,7 @@ use_ok('Ravada');
 use_ok('Ravada::VM::Void');
 use_ok('Ravada::Auth::SQL');
 
+init();
 my $ravada = rvd_back();
 
 #
diff --git a/t/user/35_share.t b/t/user/35_share.t
index f0948ade7..40d8a13ef 100644
--- a/t/user/35_share.t
+++ b/t/user/35_share.t
@@ -134,6 +134,7 @@ sub test_machine_info_shared($user, $clone) {
 
 ##############################################################
 
+init();
 clean();
 for my $vm_name ( vm_names() ) {