--------------------------------------------------------------------------------
-- Utility functions

commentIsApproved :: Comment -> Bool
commentIsApproved = isJust . commentApprovedTs
commentIsApproved :: Comment -> Bool
commentIsApproved = isJust . commentApprovedTs
commentIsApproved = isJust . commentApprovedTs