From 96cf710c07b0d6f788418e4bbce057dbd1c236cb Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Tue, 28 Feb 2006 16:51:28 +0000
Subject: fix indentation

---
 perl-install/any.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 722c19828..e41b51c13 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -69,7 +69,7 @@ sub create_user {
 	}
 
 	require authentication;
-        my $symlink_home_from = $u->{rename_from} && (getpwnam($u->{rename_from}))[7];
+	my $symlink_home_from = $u->{rename_from} && (getpwnam($u->{rename_from}))[7];
 	run_program::raw({ root => $::prefix, sensitive_arguments => 1 },
 			    ($u->{rename_from} ? 'usermod' : 'adduser'), 
 			    '-p', authentication::user_crypted_passwd($u, $isMD5),
@@ -80,7 +80,7 @@ sub create_user {
 			    ($u->{rename_from}
 			     ? ('-l', $u->{name}, $u->{rename_from})
 			     : $u->{name}));
-        symlink($u->{home}, $symlink_home_from) if $symlink_home_from;
+	symlink($u->{home}, $symlink_home_from) if $symlink_home_from;
     }
 
     my (undef, undef, $uid, $gid, undef, undef, undef, $home) = getpwnam($u->{name});
-- 
cgit v1.2.1