From b0d560708f5fd7b244ce4b98973a1378f15963d0 Mon Sep 17 00:00:00 2001 From: Andrew Cady Date: Sat, 22 Jun 2019 19:02:42 -0400 Subject: change name of symlink target in /var/cache/kiki/ --- lib/Kiki.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Kiki.hs') diff --git a/lib/Kiki.hs b/lib/Kiki.hs index 828a251..c1dd587 100644 --- a/lib/Kiki.hs +++ b/lib/Kiki.hs @@ -331,7 +331,7 @@ refreshCache rt rootdir = do unslash xs = xs timeout = -1 -- TODO: set milisecond timeout on dotlock createDirectoryIfMissing True cachedir - tmpdir <- createTempDirectory cachedir ("transaction." ++ takeBaseName destdir) + tmpdir <- createTempDirectory cachedir (takeBaseName destdir ++ ".") createSymbolicLink (makeRelative cachedir tmpdir) (tmpdir ++ ".link") lock <- dotlock_create destdir 0 T.mapM (flip dotlock_take timeout) lock -- cgit v1.2.3