diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-11-06 10:37:18 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-11-06 10:37:18 +0000 |
| commit | 9f0124c4939104748f33559a2efc017d6f41b369 (patch) | |
| tree | f53cd6bf4a4ede7c2bd49aba78576ac112cd9da5 /perl-install/network | |
| parent | d11b94c6f82a12bd0cc74843a5a5af59e82aeb56 (diff) | |
| download | drakx-9f0124c4939104748f33559a2efc017d6f41b369.tar drakx-9f0124c4939104748f33559a2efc017d6f41b369.tar.gz drakx-9f0124c4939104748f33559a2efc017d6f41b369.tar.bz2 drakx-9f0124c4939104748f33559a2efc017d6f41b369.tar.xz drakx-9f0124c4939104748f33559a2efc017d6f41b369.zip | |
escaped strings fixes
Diffstat (limited to 'perl-install/network')
| -rw-r--r-- | perl-install/network/modem.pm | 2 | ||||
| -rw-r--r-- | perl-install/network/nfs.pm | 4 |
2 files changed, 3 insertions, 3 deletions
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; diff --git a/perl-install/network/nfs.pm b/perl-install/network/nfs.pm index dae09af1b..20c9055f3 100644 --- a/perl-install/network/nfs.pm +++ b/perl-install/network/nfs.pm @@ -35,8 +35,8 @@ sub check { } sub find_servers { - my $pid2 = open(my $F2, "rpcinfo-flushed -b mountd 2 |"); - my $pid3 = open(my $F3, "rpcinfo-flushed -b mountd 3 |"); + open(my $F2, "rpcinfo-flushed -b mountd 2 |"); + open(my $F3, "rpcinfo-flushed -b mountd 3 |"); common::nonblock($F2); common::nonblock($F3); |