Просмотр исходного кода

fix gproc broken script processing

Maxim Sokhatsky 11 лет назад
Родитель
Сommit
814de6007a
2 измененных файлов с 3 добавлено и 4 удалено
  1. BIN
      mad
  2. 3 4
      src/mad_utils.erl

+ 3 - 4
src/mad_utils.erl

@@ -79,10 +79,9 @@ script(ConfigFile, Conf) ->
     File = ConfigFile ++ ".script",
     Filename = filename:basename(File),
     case file:script(File, [{'CONFIG', Conf}, {'SCRIPT', Filename}]) of
-        {ok, Out} ->
-            Out;
-        {error, _} ->
-            Conf
+        {ok, {error,_}} -> Conf;
+        {ok, Out} -> Out;
+        {error, _} -> Conf
     end.
 
 -spec sub_dirs(directory(), file:filename(), [term()]) -> [directory()].