handle empty source files

fjl · Aug 11, 2011 · b6d7bbb · b6d7bbb
1 parent 49d7cbc
commit b6d7bbb
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/tetrapak_task_erlc.erl b/src/tetrapak_task_erlc.erl
@@ -178,6 +178,8 @@ erlang_source_files(Path) ->
 
 scan_source(Path) ->
     case epp_dodger:quick_parse_file(Path, []) of
+        {ok, []} ->
+            #erl{mtime = tpk_file:mtime(Path), file = Path, module = filename:basename(Path, ".erl")};
         {ok, Forms} ->
             Rec = #erl{mtime = tpk_file:mtime(Path), file = Path, module = filename:basename(Path, ".erl")},
             lists:foldl(fun (F, Acc) -> do_form(Path, F, Acc) end, Rec, tl(Forms))