attachmentAudio :: TestTree
attachmentAudio = parseTest "Audio attachment" audioVal
                $ standardMessaging (Just 1522751139155)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSsSTn2XdcvE-1U1i5wpqbrOHw"
                                     (Just 3808)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment AUDIO
                           $ CallbackMultimediaPayload "https://cdn.fbsbx.com/v/t59.3654-21/29451513_1977941472233841_8301729723659059200_n.aac/audioclip-1522751138417-2894.aac?_nc_cat=0&oh=a395e53726c98b7e0d60a5d30edcbeab&oe=5AC60884"
attachmentAudio :: TestTree
attachmentAudio = parseTest "Audio attachment" audioVal
                $ standardMessaging (Just 1522751139155)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSsSTn2XdcvE-1U1i5wpqbrOHw"
                                     (Just 3808)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment AUDIO
                           $ CallbackMultimediaPayload "https://cdn.fbsbx.com/v/t59.3654-21/29451513_1977941472233841_8301729723659059200_n.aac/audioclip-1522751138417-2894.aac?_nc_cat=0&oh=a395e53726c98b7e0d60a5d30edcbeab&oe=5AC60884"
attachmentAudio = parseTest "Audio attachment" audioVal
                $ standardMessaging (Just 1522751139155)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSsSTn2XdcvE-1U1i5wpqbrOHw"
                                     (Just 3808)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment AUDIO
                           $ CallbackMultimediaPayload "https://cdn.fbsbx.com/v/t59.3654-21/29451513_1977941472233841_8301729723659059200_n.aac/audioclip-1522751138417-2894.aac?_nc_cat=0&oh=a395e53726c98b7e0d60a5d30edcbeab&oe=5AC60884"