This commit is contained in:
Joey Hess 2016-12-08 17:10:24 -04:00
parent 0288e934cc
commit 43e7044b43
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
2 changed files with 34 additions and 1 deletions

View file

@ -45,7 +45,9 @@ startMass = do
next massAdd
massAdd :: CommandPerform
massAdd = go True =<< map (separate (== ' ')) . lines <$> liftIO getContents
massAdd = do
liftIO $ fileEncoding stdin
go True =<< map (separate (== ' ')) . lines <$> liftIO getContents
where
go status [] = next $ return status
go status ((keyname,f):rest) | not (null keyname) && not (null f) = do