@@ -151,8 +151,8 @@ wait_for_yaws() -> wait_for_yaws(20). wait_for_yaws(0) -> {error, timeout}; wait_for_yaws(N) -> WA = application:which_applications(), - case [Yaws || {Yaws,_,_} <- WA, yaws =:= Yaws] of - [] -> + case lists:keysearch(yaws, 1, WA) of + false -> log(info, "Yapp starting but Yaws not ready - waiting 500 ms",[]), receive after 500 -> ok end, %% Give Yaws some time to settle own things wait_for_yaws(N-1); applications/yapp/src/yapp.erl 51cbdc0f90b7b61e83191909a427b4726e7cc21f Steve Vinoski vinoski@ieee.org http://github.com/klacke/yaws/commit/0efd59cedfb602f70683dd75139bfe649db61a86 0efd59cedfb602f70683dd75139bfe649db61a86 2009-09-17T11:17:02-07:00 2009-09-17T11:17:02-07:00 more efficient check for the yaws application being up f2d1fd96da8965d2a6f3b5f88ffb32b8535d99d2 Steve Vinoski vinoski@ieee.org