diff options
| -rw-r--r-- | installer/OpenSLX/OSSetup/Engine.pm | 3 | ||||
| -rw-r--r-- | lib/OpenSLX/Basics.pm | 5 |
2 files changed, 5 insertions, 3 deletions
diff --git a/installer/OpenSLX/OSSetup/Engine.pm b/installer/OpenSLX/OSSetup/Engine.pm index 233ba33c..e5b76f3d 100644 --- a/installer/OpenSLX/OSSetup/Engine.pm +++ b/installer/OpenSLX/OSSetup/Engine.pm @@ -506,7 +506,8 @@ sub addInstalledVendorOSToConfigDB my $vendorOSName = $self->{'vendor-os-name'}; my $vendorOS = $openslxDB->fetchVendorOSByFilter({'name' => $vendorOSName}); if (defined $vendorOS) { - if ($self->{'clone-source'} ne $vendorOS->{'clone_source'}) { + if ($vendorOS->{'clone_source'} + && $self->{'clone-source'} ne $vendorOS->{'clone_source'}) { $openslxDB->changeVendorOS( $vendorOS->{id}, { 'clone_source' => $self->{'clone-source'} } diff --git a/lib/OpenSLX/Basics.pm b/lib/OpenSLX/Basics.pm index dfcb27b1..4c3bf49c 100644 --- a/lib/OpenSLX/Basics.pm +++ b/lib/OpenSLX/Basics.pm @@ -211,8 +211,9 @@ sub openslxInit ); } if ($openslxConfig{'verbose-level'} >= 2) { - foreach my $k (sort keys %openslxConfig) { - vlog(2, "config-dump: $k = $openslxConfig{$k}"); + foreach my $key (sort keys %openslxConfig) { + my $val = $openslxConfig{$key} || ''; + vlog(2, "config-dump: $key = $val"); } } |