diff options
| author | Daniel Firth <locallycompact@gmail.com> | 2018-07-09 15:42:57 +0100 |
|---|---|---|
| committer | Daniel Firth <locallycompact@gmail.com> | 2018-07-10 10:06:02 +0100 |
| commit | e4dc51e82501201206bdfcd577c94ad29d54d20f (patch) | |
| tree | 0130ae5d2d518b9ce838e55dcabc87d87ef4b177 | |
| parent | 46bfe0d20ee43ad90eade44a7ee22b0af1b7dd12 (diff) | |
Use maybe instead of case statement in DetailsView.hs
| -rw-r--r-- | Bustle/UI/DetailsView.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/Bustle/UI/DetailsView.hs b/Bustle/UI/DetailsView.hs index 8a28367..25159e2 100644 --- a/Bustle/UI/DetailsView.hs +++ b/Bustle/UI/DetailsView.hs @@ -62,9 +62,7 @@ pickType (Detailed _ m _ _) = case m of MethodReturn {} -> "methodReturn" Error {} -> "error" Signal { signalDestination = d } -> - case d of - Nothing -> "signal" - Just _ -> "directedSignal" + maybe "signal" (const "directedSignal") d getMemberMarkup :: Member -> String getMemberMarkup m = |