[TSD-77] Fix two documentation issues that caused Hoogle to break (#32)

* Fixes two documentation issues that caused Hoogle to break

Author: mdimjasevic

src/DataSource/Types.hs

@@ -646,7 +646,7 @@ instance FromPageResultList TicketInfo where
         , exportTicketsParser obj
         ]
       where
-          -- | The case when we have the simple parser from tickets.
+        -- | The case when we have the simple parser from tickets.
         ticketListParser :: Value -> Parser (PageResultList TicketInfo)
         ticketListParser = withObject "ticketList" $ \o ->
             PageResultList
@@ -810,4 +810,3 @@ renderTicketStatus AnalyzedByScriptV1_1 = "analyzed-by-script-v1.1"
 renderTicketStatus AnalyzedByScriptV1_2 = "analyzed-by-script-v1.2"
 renderTicketStatus NoKnownIssue         = "no-known-issues"
 renderTicketStatus NoLogAttached        = "no-log-files"
-

src/Lib.hs

@@ -556,7 +556,7 @@ filterAnalyzedTickets ticketsInfo =
     unsolvedTicketStatus = map TicketStatus ["new", "open", "hold", "pending"]
 
     isTicketOpen :: TicketInfo -> Bool
-    isTicketOpen TicketInfo{..} = tiStatus `elem` unsolvedTicketStatus-- || ticketStatus == "new"
+    isTicketOpen TicketInfo{..} = tiStatus `elem` unsolvedTicketStatus
 
     -- | If we have a ticket we are having issues with...
     isTicketBlacklisted :: TicketInfo -> Bool