erlang: remove retarded busy loop