Choose to not expose some property for "window" interface

Author: zhengbli

TS.fsx

@@ -234,7 +234,7 @@ let EmitProperties flavor prefix (emitScope: EmitScope) (i: Browser.Interface)=
         | None -> ()
 
         getAddedItems ItemKind.Property flavor
-        |> Array.filter (matchInterface i.Name)
+        |> Array.filter (fun addedItem -> (matchInterface i.Name addedItem) && (prefix <> "declare var " || not(OptionCheckValue false addedItem.ExposeGlobally)))
         |> Array.iter emitPropertyFromJson
 
 let EmitMethods flavor prefix (emitScope: EmitScope) (i: Browser.Interface) =

inputfiles/addedTypes.json

@@ -64,6 +64,7 @@
     {
         "kind": "property",
         "interface": "Window",
+        "exposeGlobally": false,
         "name": "URL",
         "type": "URL"
     },

inputfiles/sample.json

@@ -2,6 +2,7 @@
     {
         "kind": "property",
         "interface": "Window",
+        "exposeGlobally": false,
         "name": "URL",
         "type": "URL"
     },