diff options
author | Joey Hess <joey@kitenet.net> | 2012-08-27 13:43:03 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-08-27 13:43:03 -0400 |
commit | 2433f6ca5a602f55986bcd85c20034c88cc44a3b (patch) | |
tree | 03c10c84666301aa7252219f096867c08d662079 /Command/Assistant.hs | |
parent | b12db9ef9214d801280310222fc5e9d16f8af3de (diff) |
use the ~/.config/git-annex/program file to find command when running transfers
Diffstat (limited to 'Command/Assistant.hs')
-rw-r--r-- | Command/Assistant.hs | 3 |
1 files changed, 1 insertions, 2 deletions
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 |