diff options
| author | Damien Chaumette <dchaumette@mandriva.com> | 2003-09-08 14:54:48 +0000 |
|---|---|---|
| committer | Damien Chaumette <dchaumette@mandriva.com> | 2003-09-08 14:54:48 +0000 |
| commit | ec3798f880b10ab8b9bc4a5708649a6791e505a2 (patch) | |
| tree | a3e4b068ce79b2b4388f51eea125266783156bea /perl-install/network/netconnect.pm | |
| parent | 0f88f5713171dac3a88c72b7c9e543948a78afd6 (diff) | |
| download | drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.gz drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.bz2 drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.tar.xz drakx-ec3798f880b10ab8b9bc4a5708649a6791e505a2.zip | |
- fix/use explanations
- fix #5307 (firmware)
Diffstat (limited to 'perl-install/network/netconnect.pm')
| -rw-r--r-- | perl-install/network/netconnect.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 14f30a45f..ceaf1373f 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -285,23 +285,27 @@ name=$netcnx->{PROFILE} sub set_profile { my ($netcnx) = @_; system("/sbin/set-netprofile $netcnx->{PROFILE}"); + log::explanations("current profile is $netcnx->{PROFILE}"); } sub save_profile { my ($netcnx) = @_; system("/sbin/save-netprofile $netcnx->{PROFILE}"); + log::explanations("saved $netcnx->{PROFILE} profile"); } sub del_profile { - my ($_netcnx, $profile) = @_; + my ($profile) = @_; return if !$profile || $profile eq "default"; rm_rf("$::prefix/etc/netprofile/profiles/$profile"); + log::explanations("deleted 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"); + log::explanations("created $profile profile"); } sub get_profiles() { |