Minor syntax detail.
This commit is contained in:
parent
e893a6dca2
commit
7593702398
@ -568,7 +568,8 @@ handleAction = case _ of
|
||||
H.modify_ \s -> s { _currentRR { mechanisms = case s._currentRR.mechanisms of
|
||||
Just ms -> Just (remove_id i $ attach_id 0 ms)
|
||||
Nothing -> Nothing
|
||||
} }
|
||||
}
|
||||
}
|
||||
|
||||
SPF_Mechanism_Add -> do
|
||||
state <- H.get
|
||||
|
Loading…
Reference in New Issue
Block a user