hotfix

hotfix character encoding before cleaning json data

Crunchyroll Downloader/My Project/AssemblyInfo.vb

@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")>
 
-<Assembly: AssemblyVersion("3.8.4.0")>
-<Assembly: AssemblyFileVersion("3.8.4.0")>
+<Assembly: AssemblyVersion("3.8.4.1")>
+<Assembly: AssemblyFileVersion("3.8.4.1")>
 <Assembly: NeutralResourcesLanguage("en")>

Crunchyroll Downloader/Subfolder.vb

@@ -10,7 +10,7 @@ Module Subfolder
     Public SubFolder_Value As String = "[ ignore subfolder ]"
 
     Public Function CleanJSON(ByVal JSON As String) As String
-
+        JSON = JSON.Replace("&", "&").Replace("/u0026", "&").Replace("\u002F", "/").Replace("\u0026", "&")
         While CBool(InStr(JSON, "\"))
             Dim index As Integer = InStr(JSON, "\")
             Dim myName As New StringBuilder(JSON)