diff options
Diffstat (limited to 'installer/OpenSLX/OSExport/FileSystem')
| -rw-r--r-- | installer/OpenSLX/OSExport/FileSystem/NFS.pm | 4 | ||||
| -rw-r--r-- | installer/OpenSLX/OSExport/FileSystem/SquashFS.pm | 4 |
2 files changed, 8 insertions, 0 deletions
diff --git a/installer/OpenSLX/OSExport/FileSystem/NFS.pm b/installer/OpenSLX/OSExport/FileSystem/NFS.pm index 0073d55c..878b956b 100644 --- a/installer/OpenSLX/OSExport/FileSystem/NFS.pm +++ b/installer/OpenSLX/OSExport/FileSystem/NFS.pm @@ -43,6 +43,7 @@ sub initialize $self->{'engine'} = $engine; my $exportBasePath = "$openslxConfig{'public-path'}/export"; $self->{'export-path'} = "$exportBasePath/nfs/$engine->{'vendor-os-name'}"; + return; } sub exportVendorOS @@ -52,6 +53,7 @@ sub exportVendorOS my $target = $self->{'export-path'}; $self->_copyViaRsync($source, $target); + return; } sub purgeExport @@ -101,6 +103,7 @@ sub showExportConfigInfo # TODO : add something a bit more clever here... # my $exports = slurpFile("/etc/exports"); + return; } ################################################################################ @@ -126,6 +129,7 @@ sub _copyViaRsync close($rsyncFH) or die _tr("unable to export to target '%s', giving up! (%s)", $target, $!); + return; } sub _determineIncludeExcludeList diff --git a/installer/OpenSLX/OSExport/FileSystem/SquashFS.pm b/installer/OpenSLX/OSExport/FileSystem/SquashFS.pm index 6aeb9cd2..82c4fdda 100644 --- a/installer/OpenSLX/OSExport/FileSystem/SquashFS.pm +++ b/installer/OpenSLX/OSExport/FileSystem/SquashFS.pm @@ -45,6 +45,7 @@ sub initialize $self->{'block-device'} = $blockDevice; my $exportBasePath = "$openslxConfig{'public-path'}/export"; $self->{'export-path'} = "$exportBasePath/sqfs/$engine->{'vendor-os-name'}"; + return; } sub exportVendorOS @@ -74,6 +75,7 @@ sub exportVendorOS $self->_createSquashFS($source, $target, $includeExcludeList); } $self->_addBlockDeviceTagToExport($target); + return; } sub purgeExport @@ -176,6 +178,7 @@ sub showExportConfigInfo my $export = shift; $self->{'block-device'}->showExportConfigInfo($export); + return; } ################################################################################ @@ -317,6 +320,7 @@ sub _addBlockDeviceTagToExport my $tagName = "$target" . '@' . lc($self->{'block-device'}->{name}); linkFile(basename($target), $tagName); + return; } sub _removeBlockDeviceTagFromExport |