From 5239ff97e39bce953b07c12f1e18475c9aa37dd2 Mon Sep 17 00:00:00 2001
From: Danny <danny@alcion.ai>
Date: Mon, 2 Jan 2023 12:39:54 -0500
Subject: [PATCH] GC: Sharepoint: List: Delete feature added (#2017)

## Description
Adds the ability to delete a from a SharePoint Site for purge script
<!-- Insert PR description-->

## Does this PR need a docs update or release note?

- [x] :no_entry: No

## Type of change

<!--- Please check the type of change your PR introduces: --->
- [x] :sunflower: Feature

## Issue(s)

<!-- Can reference multiple issues. Use one of the following "magic words" - "closes, fixes" to auto-close the Github issue. -->
*related to #2016 <issue>
---
 src/internal/connector/sharepoint/list.go      | 17 +++++++++++++++++
 src/internal/connector/sharepoint/list_test.go |  1 +
 2 files changed, 18 insertions(+)

diff --git a/src/internal/connector/sharepoint/list.go b/src/internal/connector/sharepoint/list.go
index 159fca216..391902ea1 100644
--- a/src/internal/connector/sharepoint/list.go
+++ b/src/internal/connector/sharepoint/list.go
@@ -2,6 +2,7 @@ package sharepoint
 
 import (
 	"context"
+	"fmt"
 
 	"github.com/microsoftgraph/msgraph-sdk-go/models"
 	mssite "github.com/microsoftgraph/msgraph-sdk-go/sites"
@@ -356,3 +357,19 @@ func fetchColumnLinks(
 
 	return links, nil
 }
+
+// DeleteList removes a list object from a site.
+func DeleteList(
+	ctx context.Context,
+	gs graph.Servicer,
+	siteID, listID string,
+) error {
+	err := gs.Client().SitesById(siteID).ListsById(listID).Delete(ctx, nil)
+	errorMsg := fmt.Sprintf("failure deleting listID %s from site %s. Details: %s",
+		listID,
+		siteID,
+		support.ConnectorStackErrorTrace(err),
+	)
+
+	return errors.Wrap(err, errorMsg)
+}
diff --git a/src/internal/connector/sharepoint/list_test.go b/src/internal/connector/sharepoint/list_test.go
index 6621de210..cab1a190a 100644
--- a/src/internal/connector/sharepoint/list_test.go
+++ b/src/internal/connector/sharepoint/list_test.go
@@ -28,6 +28,7 @@ func (suite *SharePointSuite) SetupSuite() {
 func TestSharePointSuite(t *testing.T) {
 	if err := tester.RunOnAny(
 		tester.CorsoCITests,
+		tester.CorsoGraphConnectorSharePointTests,
 	); err != nil {
 		t.Skip(err)
 	}