diff --git a/make-pages/Info.hs b/make-pages/Info.hs index 483041f..fb789f4 100644 --- a/make-pages/Info.hs +++ b/make-pages/Info.hs @@ -174,8 +174,8 @@ readNsfwFilter "all" = pure AllN readNsfwFilter _ = empty matchNsfw :: NsfwFilter -> Info -> Bool -matchNsfw NoNsfw i = #allSfw i -matchNsfw OnlyNsfw i = #allNsfw i +matchNsfw NoNsfw i = #anySfw i +matchNsfw OnlyNsfw i = #anyNsfw i matchNsfw AllN _ = True instance FromYAML NsfwFilter where