Handle escaping quotes for models using firmware < 6.2

related: 943da05
penfolduk · Aug 25, 2015 · 7f30867 · 7f30867
1 parent a0a2098
commit 7f30867
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/Plex/source/PlexMediaServer.brs b/Plex/source/PlexMediaServer.brs
@@ -505,14 +505,14 @@ End Function
 '* relative to the server URL
 Function FullUrl(serverUrl, sourceUrl, key) As String
     ' Replace quotes
-    if instr(1, tostr(key), """") > 0 then
-        rQuote = CreateObject("roRegex", """", "")
-        key = rQuote.ReplaceAll(key, HttpEncode(""""))
+    if instr(1, tostr(key), chr(34)) > 0 then
+        rQuote = CreateObject("roRegex", chr(34), "")
+        key = rQuote.ReplaceAll(key, HttpEncode(chr(34)))
     end if
 
-    if instr(1, tostr(sourceUrl), """") > 0 then
-        rQuote = CreateObject("roRegex", """", "")
-        sourceUrl = rQuote.ReplaceAll(sourceUrl, HttpEncode(""""))
+    if instr(1, tostr(sourceUrl), chr(34)) > 0 then
+        rQuote = CreateObject("roRegex", chr(34), "")
+        sourceUrl = rQuote.ReplaceAll(sourceUrl, HttpEncode(chr(34)))
     end if
 
     finalUrl = ""