From 9f0124c4939104748f33559a2efc017d6f41b369 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 6 Nov 2003 10:37:18 +0000
Subject: escaped strings fixes

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

(limited to 'perl-install/network/modem.pm')

diff --git a/perl-install/network/modem.pm b/perl-install/network/modem.pm
index 98dadd2da..f6978adea 100644
--- a/perl-install/network/modem.pm
+++ b/perl-install/network/modem.pm
@@ -141,7 +141,7 @@ END
 	if ($replaced) {
 	    output($secrets, @l);
         } else {
-	    append_to_file($secrets, "$toreplace{login}  ppp0  \"$toreplace{passwd}\"\n");
+	    append_to_file($secrets, qq($toreplace{login}  ppp0  "$toreplace{passwd}"\n));
 	}
 	#- restore access right to secrets file, just in case.
 	chmod 0600, $secrets;
-- 
cgit v1.2.1