From 2433f6ca5a602f55986bcd85c20034c88cc44a3b Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Mon, 27 Aug 2012 13:43:03 -0400
Subject: use the ~/.config/git-annex/program file to find command when running
 transfers

---
 Command/Assistant.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'Command')

diff --git a/Command/Assistant.hs b/Command/Assistant.hs
index 24cc3ec6c..eb2a4a500 100644
--- a/Command/Assistant.hs
+++ b/Command/Assistant.hs
@@ -55,8 +55,7 @@ autoStart = do
 	ifM (doesFileExist autostartfile)
 		( do
 			dirs <- lines <$> readFile autostartfile
-			programfile <- programFile
-			program <- catchDefaultIO (readFile programfile) "git-annex"
+			program <- readProgramFile
 			when (null dirs) nothing
 			forM_ dirs $ \d -> do
 				putStrLn $ "git-annex autostart in " ++ d
-- 
cgit v1.2.3