From 805f7a55d5adfc4cc3d7fd40d1e18f5936b70db7 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Wed, 10 Sep 2003 13:56:01 +0000
Subject: follow std explanations policy

---
 perl-install/network/netconnect.pm | 8 ++++----
 perl-install/standalone/drakedm    | 4 ++--
 2 files changed, 6 insertions(+), 6 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index bd7d45ecc..00803a90a 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -276,27 +276,27 @@ fi
 sub set_profile {
     my ($netcnx) = @_;
     system("/sbin/set-netprofile $netcnx->{PROFILE}");
-    log::explanations("current profile is $netcnx->{PROFILE}");
+    log::explanations("Switching to \"$netcnx->{PROFILE}\" profile");
 }
 
 sub save_profile {
     my ($netcnx) = @_;
     system("/sbin/save-netprofile $netcnx->{PROFILE}");
-    log::explanations("saved $netcnx->{PROFILE} profile");
+    log::explanations("Saving \"$netcnx->{PROFILE}\" profile");
 }
 
 sub del_profile {
     my ($profile) = @_;
     return if !$profile || $profile eq "default";
     rm_rf("$::prefix/etc/netprofile/profiles/$profile");
-    log::explanations("deleted 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");
-    log::explanations("created $profile profile");
+    log::explanations("Creating \"$profile\" profile");
 }
 
 sub get_profiles() {
diff --git a/perl-install/standalone/drakedm b/perl-install/standalone/drakedm
index 286437bf2..2547cd901 100644
--- a/perl-install/standalone/drakedm
+++ b/perl-install/standalone/drakedm
@@ -43,7 +43,7 @@ foreach (cat_($cfg_file)) {
 
 if (!$dm) {
     $dm = 'KDE';
-    log::explanations("defaulting to $dm for display manager")
+    log::explanations("Defaulting to $dm for display manager")
 }
 
 my @raw_list = sort keys %dm;
@@ -72,7 +72,7 @@ several different X sessions on your local machine at the same time.")),
         s/^\n//g;
         $_ .= "\nDISPLAYMANAGER=$dm\n" if eof;
     } $cfg_file;
-    log::explanations("display manager is now $dm");
+    log::explanations("Switching to \"$dm\" display manager");
     if (any::running_window_manager()) {
         $in->ask_okcancel('', N("The change is done, do you want to restart the dm service ?"), 1) and services::restart("dm");
     }
-- 
cgit v1.2.1