From b02cc3d7a4c9bd7956fa880b45d47648084b053b Mon Sep 17 00:00:00 2001
From: TekH <h.tek@digitaldata.works>
Date: Mon, 6 Oct 2025 14:39:55 +0200
Subject: [PATCH] refactor(PDFBurner): convert to Sub

---
 .../Jobs/FinalizeDocument/PDFBurner.vb                        | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb b/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb
index e5f2e2f3..e24ee4b3 100644
--- a/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb
+++ b/EnvelopeGenerator.CommonServices/Jobs/FinalizeDocument/PDFBurner.vb
@@ -68,7 +68,7 @@ Namespace Jobs.FinalizeDocument
             End Using
         End Function
 
-        Private Function AddInstantJSONAnnotationToPDF(pInstantJSON As String) As Void
+        Private Sub AddInstantJSONAnnotationToPDF(pInstantJSON As String)
             Dim oAnnotationData = JsonConvert.DeserializeObject(Of AnnotationData)(pInstantJSON)
             oAnnotationData.annotations.Reverse()
 
@@ -105,7 +105,7 @@ Namespace Jobs.FinalizeDocument
 
                 isSeal = False
             Next
-        End Function
+        End Sub
 
         Private Function AddImageAnnotation(pAnnotation As Annotation, pAttachments As Dictionary(Of String, Attachment)) As Void
             Dim oAttachment = pAttachments.Where(Function(a) a.Key = pAnnotation.imageAttachmentId).