diff options
| -rw-r--r-- | src/rabbit_alarm.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/rabbit_alarm.erl b/src/rabbit_alarm.erl index f3fa1962e4..16b69af987 100644 --- a/src/rabbit_alarm.erl +++ b/src/rabbit_alarm.erl @@ -114,7 +114,7 @@ handle_event({set_alarm, Alarm}, State = #alarms{alarms = Alarms}) -> end; handle_event({clear_alarm, Alarm}, State = #alarms{alarms = Alarms}) -> - ExistingAlarm = lists:member(Alarm, [Res || {Res, _} <- Alarms]), + ExistingAlarm = lists:keymember(Alarm, 1, Alarms), case ExistingAlarm of true -> handle_clear_alarm(Alarm, |