Fix: URI from LSP is decoded properly (#392)

Author: EduardoRFS

package.json

@@ -29,6 +29,7 @@
     "@opam/ppxlib": "*",
     "@opam/reason": ">= 3.5.0",
     "@opam/stdlib-shims": "*",
+    "@opam/uri": "3.1.0",
     "@reason-native/pastel": "^0.2.2",
     "@reason-native/rely": "^3.1.0",
     "ocaml": "~4.8.1000",

util/Utils.re

@@ -130,9 +130,11 @@ let parseWindowsUri = withoutScheme => {
   |> String.concat({|\|})
 };
 
-let parseUri = (uri) =>
-  if (startsWith(uri, "file://")) {
-    let withoutScheme = sliceToEnd(uri, String.length("file://"));
+let parseUri = (uri) => {
+  let withoutPct = Uri.pct_decode(uri);
+  if (startsWith(withoutPct, "file://")) {
+    let withoutScheme = sliceToEnd(withoutPct, String.length("file://"));
+
     if (Sys.os_type == "Unix") {
       Some(withoutScheme)
     } else {
@@ -141,6 +143,7 @@ let parseUri = (uri) =>
   } else {
     None
   };
+}
 
 let locationOffset = (loc, start, length) =>
   Location.{

util/dune

@@ -1,7 +1,7 @@
 (library
   (name Util)
   (public_name reason-language-server.Util)
-  (libraries Belt Vendor str)
+  (libraries Belt Vendor str uri)
   (flags :standard -open Vendor -w -9)
   (preprocess (pps Belt_ppx Ppx_monads))
   )