summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2008-03-27 17:31:14 +0000
committerOlivier Blin <oblin@mandriva.com>2008-03-27 17:31:14 +0000
commite27d35e31f7141ea80e1375104c574cf2a13db0b (patch)
tree01f59c3d6250d1d1ca2a61675bda4f6c182cd7f7
parent498282d5ee4da1eafb6a910065d1bade333e6b7c (diff)
downloaddrakx-e27d35e31f7141ea80e1375104c574cf2a13db0b.tar
drakx-e27d35e31f7141ea80e1375104c574cf2a13db0b.tar.gz
drakx-e27d35e31f7141ea80e1375104c574cf2a13db0b.tar.bz2
drakx-e27d35e31f7141ea80e1375104c574cf2a13db0b.tar.xz
drakx-e27d35e31f7141ea80e1375104c574cf2a13db0b.zip
follow perl_checker advice
-rwxr-xr-xperl-install/standalone/finish-install2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/finish-install b/perl-install/standalone/finish-install
index 4618ab2aa..2fa557e3f 100755
--- a/perl-install/standalone/finish-install
+++ b/perl-install/standalone/finish-install
@@ -122,7 +122,7 @@ sub ask_users() {
#- replace home path in user config files
my $old_home = "/home/$old_user";
my $new_home = "/home/$users->[0]{name}";
- run_program::run("grep -rl $old_home $new_home/.??* | while read f; do perl -pi -e 's,$old_home,$new_home,g' \"\$f\"; done");
+ run_program::run(qq(grep -rl $old_home $new_home/.??* | while read f; do perl -pi -e 's,$old_home,$new_home,g' "\$f"; done));
}
}