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

exclude fs and active from synrc mad releases

Namdak Tonpa 9 лет назад
Родитель
Сommit
26a29f53fe
3 измененных файлов с 2 добавлено и 2 удалено
  1. 1 1
      include/mad.hrl
  2. BIN
      mad
  3. 1 1
      src/mad_release.erl

+ 1 - 1
include/mad.hrl

@@ -1 +1 @@
--define(VERSION,"e764be").
+-define(VERSION,"de49b2").


+ 1 - 1
src/mad_release.erl

@@ -9,7 +9,7 @@ release(Name) ->
     Sorted = [ lists:keyfind(A,1,Apps) || A <- element(2,mad_plan:orderapps())],
     {L,R}     = lists:unzip(Sorted),
     {Ver,Dir} = lists:unzip(R),
-    NameVer   = lists:zip(L,Ver),
+    NameVer   = [ X || X <- lists:zip(L,Ver), element(1,X) /= active, element(1,X) /= fs ],
     {{release, {Name, "1"}, {erts, erlang:system_info(version)},NameVer},Sorted}.
 
 scripts(N) ->