allow deleting teams chat msgs

Author: hongooi73

NEWS.md

@@ -6,6 +6,10 @@
 - Add the ability to load Excel files (with extension .xls or .xlsx) to the `ms_drive_item$load_dataframe()` method. This requires the readxl package to be installed.
 - Fix a bug in downloading shared files in business SharePoint/OneDrive (#189)
 
+## Teams
+
+- Enable deleting of chat messages, now that this functionality is exposed in the underlying Graph API (#166).
+
 ## Planner
 
 - Fix a bug in the `ms_plan$get_details()` method.

R/ms_chat_message.R

@@ -10,7 +10,7 @@
 #' - `properties`: The item properties (metadata).
 #' @section Methods:
 #' - `new(...)`: Initialize a new object. Do not call this directly; see 'Initialization' below.
-#' - `delete(confirm=TRUE)`: Delete this message. Currently the Graph API does not support deleting Teams messages, so this method is disabled.
+#' - `delete(confirm=TRUE)`: Delete this message.
 #' - `update(...)`: Update the message's properties (metadata) in Microsoft Graph.
 #' - `do_operation(...)`: Carry out an arbitrary operation on the message.
 #' - `sync_fields()`: Synchronise the R object with the message metadata in Microsoft Graph.
@@ -107,11 +107,6 @@ public=list(
         self$get_reply(message_id)$delete(confirm=confirm)
     },
 
-    delete=function(confirm=TRUE)
-    {
-        stop("Deleting Teams messages is not currently supported", call.=FALSE)
-    },
-
     print=function(...)
     {
         cat("<Teams message>\n", sep="")