Anton Lebedevich 13 лет назад
Родитель
Сommit
d764524559
1 измененных файлов с 6 добавлено и 0 удалено
  1. 6 0
      src/pgsql_sock.erl

+ 6 - 0
src/pgsql_sock.erl

@@ -432,6 +432,12 @@ on_message({$D, <<_Count:?int16, Bin/binary>>}, State) ->
     notify(State, {data, Data}),
     {noreply, State};
 
+%% PortalSuspended
+on_message({$s, <<>>}, State) ->
+    #state{queue = Q} = State,
+    notify(State, suspended),
+    {noreply, State#state{queue = queue:drop(Q)}};
+
 %% CommandComplete
 on_message({$C, Bin}, State) ->
     #state{queue = Q} = State,