From d1dc40dcd6c57c9fa529a2da311e8a7d031e1da6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 19 Nov 2003 15:23:28 +0000 Subject: .kde/share/cache is a symlink to a tmpfs directory to ensure the key doesn't grow too much --- move/move.pm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'move') diff --git a/move/move.pm b/move/move.pm index c0a0984c6..b3850c3c6 100644 --- a/move/move.pm +++ b/move/move.pm @@ -381,6 +381,15 @@ sub install_TrueFS_in_home { run_program::run('mount', '-o', 'bind', "$dir/$_", "/home/$user/$_"); } + + my $cache = "/tmp/.$user-cache"; + foreach (qw(.kde/share/cache)) { + mkdir_p("$cache/$_"); + mkdir_p("/home/$user/" . dirname($_)); + symlink "$cache/$_", "/home/$user/$_"; + } + run_program::run('chown', '-R', "$user.$user", $cache); + $ENV{ICEAUTHORITY} = "$dir/.ICEauthority"; } } -- cgit v1.2.1