improve upgrade

This commit is contained in:
Joey Hess 2011-03-16 11:53:46 -04:00
parent 744638197f
commit 5eb76d2b03
5 changed files with 30 additions and 14 deletions

View file

@ -60,4 +60,4 @@ gitAttributesUnWrite repo = do
when attrexists $ do
c <- readFileStrict attributes
safeWriteFile attributes $ unlines $
filter (/= Command.Init.attrLine) $ lines c
filter (\l -> not $ l `elem` Command.Init.attrLines) $ lines c