fix erlang syntax checker

syntax_checkers/erlang.vim

@@ -15,16 +15,15 @@ endif
 let loaded_erlang_syntax_checker = 1
 
 "bail if the user doesnt have escript installed
-if !executable("erl")
+if !executable("escript")
     finish
 endif
 
-"g:syntastic_erlc_attrs currently need to set in .vimrc
+let s:check_file = expand('<sfile>:p:h') . '/erlang_check_file.erl'
-"TODO: make g:syntastic_erlc_attrs project specific
+if !exists("g:syntastic_erlc_include_path")
-if !exists("g:syntastic_erlc_attrs")
+    let g:syntastic_erlc_include_path=""
-    let g:syntastic_erlc_attrs=""
 endif
-let s:check_file = expand('<sfile>:p:h') . '/erlang_check_file "'.g:syntastic_erlc_attrs.'"'
+
 
 function! SyntaxCheckers_erlang_GetLocList()
     let extension = expand('%:e')
@@ -36,10 +35,10 @@ function! SyntaxCheckers_erlang_GetLocList()
         if match(shebang, 'escript') >= 0
             let makeprg = 'escript -s '.shellescape(expand('%:p'))
         else
-            let makeprg = s:check_file . ' '. shellescape(expand('%:p'))
+            let makeprg = s:check_file . ' '. shellescape(expand('%:p')).' '.g:syntastic_erlc_include_path
         endif
     else
-        let makeprg =  s:check_file . ' ' . shellescape(expand('%:p'))
+        let makeprg =  s:check_file . ' ' . shellescape(expand('%:p')).' '.g:syntastic_erlc_include_path
     endif
     let errorformat = '%f:%l:\ %tarning:\ %m,%E%f:%l:\ %m'
 

syntax_checkers/erlang_check_file

@@ -1,3 +0,0 @@
-#!/usr/bin/env bash
-INCLUDE_DIR=" -pa `dirname ${2}`/../include "
-erl ${1} ${INCLUDE_DIR} -compile ${2}

syntax_checkers/erlang_check_file.erl

@@ -0,0 +1,16 @@
+#!/usr/bin/env escript
+-export([main/1]).
+
+main([FileName| LibDirs=[_|_]]) ->
+    code:add_pathsa(LibDirs),
+    main([FileName]);
+
+main([FileName]) ->
+    compile:file(FileName, [warn_obsolete_guard,
+                            warn_unused_import,
+                            warn_shadow_vars,
+                            warn_export_vars,
+                            strong_validation,
+                            report,
+                            {i, filename:dirname(FileName) ++ "/../include"}
+                        ]).