* renamed installSelection() and removeSelection() to ...Packages(), as that's

  what it is
* automatically replace newlines in packagelist by a space

git-svn-id: http://svn.openslx.org/svn/openslx/openslx/trunk@1641 95ad53e4-c205-0410-b2fa-d234c58c8868

1 files changed, 8 insertions, 6 deletions

diff --git a/installer/OpenSLX/OSSetup/MetaPackager/smart.pm b/installer/OpenSLX/OSSetup/MetaPackager/smart.pm
index bc13d1ee..27995e01 100644
--- a/installer/OpenSLX/OSSetup/MetaPackager/smart.pm
+++ b/installer/OpenSLX/OSSetup/MetaPackager/smart.pm
@@ -82,22 +82,24 @@ sub setupPackageSource
 	return 1;
 }
 
-sub installSelection
+sub installPackages
 {
-	my $self         = shift;
-	my $pkgSelection = shift;
-	my $doRefresh    = shift || 0;
+	my $self      = shift;
+	my $packages  = shift;
+	my $doRefresh = shift || 0;
+
+	$packages =~ tr{\n}{ };
 
 	if ($doRefresh && slxsystem("smart update")) {
 		die _tr("unable to update channel info (%s)\n", $!);
 	}
-	if (slxsystem("smart install -y $pkgSelection")) {
+	if (slxsystem("smart install -y $packages")) {
 		die _tr("unable to install selection (%s)\n", $!);
 	}
 	return 1;
 }
 
-sub removeSelection
+sub removePackages
 {
 	my $self         = shift;
 	my $pkgSelection = shift;