From 14ffb5d47bdb07e8263a2112b1634b403a299005 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 28 May 2011 22:28:14 -0400 Subject: bugfix: fix unused list numbering Introduced in 43f0a666f0f6cc152a2b778921831d6d7daedcaf --- Command/Unused.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Command') 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 -- cgit v1.2.3