delete :: LocationId -> LocationAction LocationView
delete locationId = do
    DB.Location.LocationAction.delete locationId
    return $ LVMessage $ pack "Deleted."
delete :: LocationId -> LocationAction LocationView
delete locationId = do
    DB.Location.LocationAction.delete locationId
    return $ LVMessage $ pack "Deleted."
delete locationId = do
    DB.Location.LocationAction.delete locationId
    return $ LVMessage $ pack "Deleted."