Race condition and message.type=close

[arcusfelis]

There is race condition sometimes:

17:08:36.501 [error] CRASH REPORT Process <0.9701.0> with 5 neighbours exited with reason: no case clause matching close in wsecli:process_messages/2 line 420 in gen_fsm:terminate/7 line 622
17:08:36.502 [error] gen_fsm <0.9706.0> in state open terminated with reason: no case clause matching close in wsecli:process_messages/2 line 420

This lines are 419-420:

process_messages([Message | Messages], StateData) ->
  case Message#message.type of