add IsDirectory and support Delete actions

ModpackUpdater/UpdateAction.vb

@@ -8,5 +8,6 @@ Public Class UpdateAction
     Public Property DestPath As String
     Public Property SrcPath As String
     Public Property DownloadUrl As String
+    Public Property IsDirectory As Boolean
 
 End Class

ModpackUpdater/UpdateInstaller.vb

@@ -180,9 +180,15 @@ Public Class UpdateInstaller
                         sRemote.Close()
                         fs.Close()
                     Case UpdateActionType.Delete
+                        If action.IsDirectory Then
+                            If Directory.Exists(destFilePath) Then
+                                Directory.Delete(destFilePath, True)
+                            End If
+                        Else
                             If File.Exists(destFilePath) Then
                                 File.Delete(destFilePath)
                             End If
+                        End If
                     Case UpdateActionType.Copy
                         Dim srcFilePath As String = Path.Combine(localPath, action.SrcPath)
                         If File.Exists(srcFilePath) Then