Force debug if rvd_back executed with --debug option

lib/Ravada.pm

@@ -83,6 +83,7 @@ $FILE_CONFIG = undef if ! -e $FILE_CONFIG;
 
 our $CONNECTOR;
 our $CONFIG = {};
+our $FORCE_DEBUG = 0;
 our $DEBUG;
 our $VERBOSE;
 our $CAN_FORK = 1;
@@ -3694,7 +3695,7 @@ sub _cmd_list_network_interfaces($self, $request) {
 
 sub _cmd_list_isos($self, $request){
     my $vm_type = $request->args('vm_type');
-   
+
     my $vm = Ravada::VM->open( type => $vm_type );
     $vm->refresh_storage();
     my @isos = sort { "\L$a" cmp "\L$b" } $vm->search_volume_path_re(qr(.*\.iso$));
@@ -4345,7 +4346,7 @@ sub _cmd_open_exposed_ports($self, $request) {
 }
 
 sub set_debug_value($self) {
-	$DEBUG = $self->setting('backend/debug'); 
+	$DEBUG = $FORCE_DEBUG || $self->setting('backend/debug');
 }
 
 

script/rvd_back

@@ -160,7 +160,7 @@ die "ERROR: Missing the machine name or id\n$USAGE"
 my %CONFIG;
 %CONFIG = ( config => $FILE_CONFIG )    if $FILE_CONFIG;
 
-$Ravada::DEBUG=1    if $DEBUG;
+$Ravada::FORCE_DEBUG=1    if $DEBUG;
 $Ravada::VERBOSE=1      if $VERBOSE;
 $Ravada::CAN_FORK=0    if $NOFORK;