From 51039844febe1dc7c3f7ac5b3409f00e1679ab76 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 31 Jul 2002 15:18:09 +0000 Subject: replace "$foo" with $foo --- perl-install/network/tools.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/network/tools.pm') diff --git a/perl-install/network/tools.pm b/perl-install/network/tools.pm index c2a1b28cd..f43406c80 100644 --- a/perl-install/network/tools.pm +++ b/perl-install/network/tools.pm @@ -22,7 +22,7 @@ sub write_cnx_script { '#!/bin/bash ' . if_(!$netc->{at_boot}, 'if [ "x$1" == "x--boot_time" ]; then exit; fi ') . $netc->{internet_cnx}{$netc->{internet_cnx_choice}}{$_}); - chmod 0755, "$prefix" . $_; + chmod 0755, "$prefix$_"; } } } -- cgit v1.2.1