From 7660d466718e064171973283cd9a48e72c4ac395 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 19 Feb 2013 17:31:08 -0400 Subject: shorter directory to external ssh socket Before it was too long to be used. --- Annex/Ssh.hs | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) (limited to 'Annex/Ssh.hs') diff --git a/Annex/Ssh.hs b/Annex/Ssh.hs index 444d534f6..827c40fef 100644 --- a/Annex/Ssh.hs +++ b/Annex/Ssh.hs @@ -77,12 +77,9 @@ sshCacheDir | otherwise = return Nothing where gettmpdir = liftIO $ getEnv "GIT_ANNEX_TMP_DIR" - usetmpdir tmpdir = do - u <- getUUID - let dir = tmpdir fromUUID u - liftIO $ catchMaybeIO $ do - createDirectoryIfMissing True dir - return $ dir + usetmpdir tmpdir = liftIO $ catchMaybeIO $ do + createDirectoryIfMissing True tmpdir + return $ tmpdir portParams :: Maybe Integer -> [CommandParam] portParams Nothing = [] -- cgit v1.2.3