From 21baf0bad0f156615f2f35481c2ee4deb0b889f3 Mon Sep 17 00:00:00 2001 From: SchreiberM Date: Wed, 13 Mar 2024 15:03:16 +0100 Subject: [PATCH] MS BaseControler --- EnvelopeGenerator.Form/Controllers/BaseController.vb | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/EnvelopeGenerator.Form/Controllers/BaseController.vb b/EnvelopeGenerator.Form/Controllers/BaseController.vb index 267b065b..a4c4abea 100644 --- a/EnvelopeGenerator.Form/Controllers/BaseController.vb +++ b/EnvelopeGenerator.Form/Controllers/BaseController.vb @@ -128,9 +128,14 @@ Public MustInherit Class BaseController End Function Public Function DeleteDocumentsFromDisk(pEnvelope As Envelope) As Boolean - Return pEnvelope.Documents. - Select(Function(d) DeleteDocumentFromDisk(d)). - All(Function(r) r = True) + If Not IsNothing(pEnvelope.Documents) Then + Return pEnvelope.Documents. + Select(Function(d) DeleteDocumentFromDisk(d)). + All(Function(r) r = True) + Else + Return True + End If + End Function Public Function DeleteDocumentFromDisk(pDocument As EnvelopeDocument) As Boolean