From 98323d762c992c42b48b589a6e44df3e5db11d99 Mon Sep 17 00:00:00 2001
From: damien <damien@mandriva.com>
Date: Fri, 10 Aug 2001 20:15:30 +0000
Subject: corrected password file substitution

---
 perl-install/network/tools.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm
index 2129313c2..60f57e225 100644
--- a/perl-install/network/tools.pm
+++ b/perl-install/network/tools.pm
@@ -21,7 +21,7 @@ sub write_cnx_script {
 sub write_secret_backend {
     my ($a, $b) = @_;
     foreach my $i ("pap-secrets", "chap-secrets") {
-	substInFile { s/^$a.*\n//; $_ .= "\n'$a' * '$b' * \n" if eof  } "$prefix/etc/ppp/$i";
+	substInFile { s/^'$a'.*\n//; $_ .= "\n'$a' * '$b' * \n" if eof  } "$prefix/etc/ppp/$i";
     }
 }
 
-- 
cgit v1.2.1