Bugfix: dropunused did not drop keys with two spaces in their name.
This commit is contained in:
parent
9a67f9cb8d
commit
2bf3addf49
3 changed files with 7 additions and 2 deletions
|
@ -73,6 +73,6 @@ readUnusedLog prefix = do
|
|||
then M.fromList . map parse . lines <$> liftIO (readFile f)
|
||||
else return M.empty
|
||||
where
|
||||
parse line = (head ws, fromJust $ readKey $ unwords $ tail ws)
|
||||
parse line = (num, fromJust $ readKey $ tail rest)
|
||||
where
|
||||
ws = words line
|
||||
(num, rest) = break (== ' ') line
|
||||
|
|
1
debian/changelog
vendored
1
debian/changelog
vendored
|
@ -5,6 +5,7 @@ git-annex (3.20111123) UNRELEASED; urgency=low
|
|||
* Flush json output, avoiding a buffering problem that could result in
|
||||
doubled output.
|
||||
* Avoid needing haskell98 and other fixes for new ghc. Thanks, Mark Wright.
|
||||
* Bugfix: dropunused did not drop keys with two spaces in their name.
|
||||
|
||||
-- Joey Hess <joeyh@debian.org> Tue, 22 Nov 2011 17:53:42 -0400
|
||||
|
||||
|
|
|
@ -81,3 +81,7 @@ Output:
|
|||
ok
|
||||
|
||||
Strange that `dropunused` still said "ok" when it didn't succeed at removing the file.
|
||||
|
||||
> It was misparsing the unused file, so it thought you'd asked it to drop a
|
||||
> key that didn't exist (which means already dropped) so no error. I've
|
||||
> fixed the bug. [[done]] --[[Joey]]
|
||||
|
|
Loading…
Reference in a new issue