Few bug fixes

Author: Krzysztof-Cieslak

FSharp.Atom.sln

@@ -11,7 +11,7 @@ EndProject
 Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "src", "src", "{176D5273-0AF5-44A6-894C-F057F13F3391}"
 	ProjectSection(SolutionItems) = preProject
 		src\atom-bindings.fsx = src\atom-bindings.fsx
-		src\autocomplete.fsx = src\autocomplete.fsx
+		src\core.fsx = src\core.fsx
 		src\funscript-atom.fsx = src\funscript-atom.fsx
 	EndProjectSection
 EndProject

Test/Script.fsx

@@ -12,4 +12,4 @@ let t = match foobar with
         | 1 -> 0
 
 let t = System.IO.Directory
-let a = System.IO.D
+let a = System.IO.DriveInfo.GetDrives()

src/atom-bindings.fsx

@@ -23,3 +23,12 @@ module Promise =
 module JS =
     [<JSEmitInline("({1}[{0}])")>]
     let getProperty<'T> (prop:string) (o:obj) : 'T = failwith "JS"
+
+    [<JSEmitInline("({0}[{1}] != undefined)")>]
+    let isPropertyDefined (o: obj) (key: string) : bool = failwith "JS"
+
+    [<JSEmitInline("(global[{0}] != undefined)")>]
+    let isGloballyDefined (key: string) : bool = failwith "never"
+
+    [<JSEmitInline("({0} != undefined)")>]
+    let isDefined (o: obj) : bool = failwith "never"

src/core.fsx

@@ -10,7 +10,7 @@ open FunScript.TypeScript.text_buffer
 #load "funscript-atom.fsx"
 #load "atom-bindings.fsx"
 
-//open Atom
+open Atom
 //open Atom.Editor
 //open Atom.Promise
 
@@ -95,7 +95,7 @@ module AutocompleteHandler =
         service |> AutocompleteService.ask str 2 cb
 
     let parseEditor (editor : IEditor) cb service = 
-        if editor.getGrammar().name = "F#" then
+        if JS.isDefined editor && JS.isPropertyDefined editor "getGrammar" && editor.getGrammar().name = "F#" then
             let path = editor.buffer.file.path
             let text = editor.getText()
             let action (s : string) = 
@@ -214,7 +214,7 @@ module Views =
             |> jq
 
         let hadnleEditorChange (panel : IPanel) (editor : AtomCore.IEditor) = 
-            if editor.getGrammar().name = "F#" then panel.show() else panel.hide()
+            if JS.isDefined editor && JS.isPropertyDefined editor "getGrammar" && editor.getGrammar().name = "F#" then panel.show() else panel.hide()
 
     type PanelOptions = 
         { item: JQuery;