Fixed linking reference failure

This commit is contained in:
v-alcherepen
2023-08-25 19:00:19 +03:00
parent e8ba53e661
commit 0dcff10cfc
@@ -934,7 +934,10 @@ End Sub
'Helper function to link snk reference with relative paths 'Helper function to link snk reference with relative paths
Function GetSnkPathRef(srcPath As String) As String Function GetSnkPathRef(srcPath As String) As String
Dim snkPath = srcPath.Remove(0, srcSiteUrl.LastIndexOf("/")) Dim snkPath = srcPath
If srcSiteUrl isNot Nothing
snkPath = srcPath.Remove(0, srcSiteUrl.LastIndexOf("/"))
End If
Return snkPath Return snkPath
End Function End Function