mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

use the ~/.config/git-annex/program file to find command when running transfers

Browse source
This commit is contained in:
Joey Hess 2012-08-27 13:43:03 -04:00
parent b12db9ef92
commit 2433f6ca5a
5 changed files with 21 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Command/Assistant.hs
View file

@ -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