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

webapp: Fix bugs that could result in a relative path such as "." being written to ~/.config/git-annex/autostart

Browse source 
and ignore any such  relative paths in the file

This was a reversion caused by the relative path changes in 5.20150113.
This commit is contained in:
Joey Hess 2015-12-02 15:57:30 -04:00
parent f16e235983
commit e9f43c07f9
Failed to extract signature
5 changed files with 41 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/WebApp/Configurators/Preferences.hs
View file

@ -118,5 +118,5 @@ postPreferencesR = page "Preferences" (Just Configuration) $ do
inAutoStartFile :: Annex Bool
inAutoStartFile = do
here <- fromRepo Git.repoPath
here <- liftIO . absPath =<< fromRepo Git.repoPath
any (`equalFilePath` here) <$> liftIO readAutoStartFile