diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-05-28 22:28:14 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-05-28 22:30:06 -0400 |
| commit | 14ffb5d47bdb07e8263a2112b1634b403a299005 (patch) | |
| tree | 338b484a54d57e63b93c40d3cbc0ec04beea0dfb /Command | |
| parent | 66a99d3740d5996d328424c9492ed83fc36a77e4 (diff) | |
bugfix: fix unused list numbering
Introduced in 43f0a666f0f6cc152a2b778921831d6d7daedcaf
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/Unused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Unused.hs b/Command/Unused.hs index 08f0148dc..96001683d 100644 --- a/Command/Unused.hs +++ b/Command/Unused.hs @@ -57,7 +57,7 @@ checkUnused = do let unusedlist = number c l when (not $ null l) $ showLongNote $ msg unusedlist writeUnusedFile file unusedlist - return $ length l + return $ c + length l checkRemoteUnused :: String -> CommandPerform checkRemoteUnused name = do |