Fix missing )

macros4outlook · Oct 17, 2021 · 052a377 · 052a377
1 parent 2a523cd
commit 052a377
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/QuoteFixMacro.bas b/QuoteFixMacro.bas
@@ -1095,7 +1095,7 @@ Public Sub getNamesOutOfString(ByVal originalName As String, ByRef senderName As
         tmpName = Left$(tmpName, Len(tmpName) - 5)
         title = "Dr. "
     ElseIf (Right$(tmpName, 3) = "Dr.") Then
-        tmpName = Left$(tmpName, Len(tmpName) - 3
+        tmpName = Left$(tmpName, Len(tmpName) - 3)
         title = "Dr. "
     End If