diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/network/netconnect.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 00803a90a..0d173ca93 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -275,13 +275,13 @@ fi sub set_profile { my ($netcnx) = @_; - system("/sbin/set-netprofile $netcnx->{PROFILE}"); + system("/sbin/set-netprofile \"$netcnx->{PROFILE}\""); log::explanations("Switching to \"$netcnx->{PROFILE}\" profile"); } sub save_profile { my ($netcnx) = @_; - system("/sbin/save-netprofile $netcnx->{PROFILE}"); + system("/sbin/save-netprofile \"$netcnx->{PROFILE}\""); log::explanations("Saving \"$netcnx->{PROFILE}\" profile"); } @@ -289,13 +289,13 @@ sub del_profile { my ($profile) = @_; return if !$profile || $profile eq "default"; rm_rf("$::prefix/etc/netprofile/profiles/$profile"); - log::explanations("Deleting \"$profile\"profile "); + log::explanations("Deleting \"$profile\" profile "); } sub add_profile { my ($netcnx, $profile) = @_; return if !$profile || $profile eq "default" || member($profile, get_profiles()); - system("/sbin/clone-netprofile $netcnx->{PROFILE} $profile"); + system("/sbin/clone-netprofile \"$netcnx->{PROFILE}\" \"$profile\""); log::explanations("Creating \"$profile\" profile"); } |