attachmentImage :: TestTree
attachmentImage = parseTest "Image attachment" imageVal
                $ standardMessaging (Just 1521927088604)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSuiOlE3doibGxAFiWxoQ_dosX"
                                     (Just 9583)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment IMAGE
                           $ CallbackMultimediaPayload "https://scontent-ort2-2.xx.fbcdn.net/v/t34.0-12/29138552_211240296290531_291369741_n.jpg?_nc_cat=0&_nc_ad=z-m&_nc_cid=0&oh=65d9fcb6baefd7481f5dc477a76571c3&oe=5AB85055"
attachmentImage :: TestTree
attachmentImage = parseTest "Image attachment" imageVal
                $ standardMessaging (Just 1521927088604)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSuiOlE3doibGxAFiWxoQ_dosX"
                                     (Just 9583)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment IMAGE
                           $ CallbackMultimediaPayload "https://scontent-ort2-2.xx.fbcdn.net/v/t34.0-12/29138552_211240296290531_291369741_n.jpg?_nc_cat=0&_nc_ad=z-m&_nc_cid=0&oh=65d9fcb6baefd7481f5dc477a76571c3&oe=5AB85055"
attachmentImage = parseTest "Image attachment" imageVal
                $ standardMessaging (Just 1521927088604)
                                    Nothing
                                    contnt
  where contnt = CMMessage $ Message "mid.$cAAFSuiOlE3doibGxAFiWxoQ_dosX"
                                     (Just 9583)
                                     msgContent
                                     []
        msgContent = MAttachment $ MessageAttachment [att]
        att = CAMultimedia $ MultimediaAttachment IMAGE
                           $ CallbackMultimediaPayload "https://scontent-ort2-2.xx.fbcdn.net/v/t34.0-12/29138552_211240296290531_291369741_n.jpg?_nc_cat=0&_nc_ad=z-m&_nc_cid=0&oh=65d9fcb6baefd7481f5dc477a76571c3&oe=5AB85055"