1 files changed, 1 insertions, 1 deletions

diff --git a/src/Data/Torrent/JSON.hs b/src/Data/Torrent/JSON.hs
index 71db3039..845b288a 100644
--- a/src/Data/Torrent/JSON.hs
+++ b/src/Data/Torrent/JSON.hs
@@ -30,7 +30,7 @@ mapWhile p f = go
     go []       = []
     go (x : xs)
       |    p x    = f x : go xs
-      | otherwise = xs
+      | otherwise = x : xs
 
 omitRecordPrefix :: Options
 omitRecordPrefix = omitLensPrefix