summaryrefslogtreecommitdiff
path: root/Logs/View.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Logs/View.hs')
-rw-r--r--Logs/View.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Logs/View.hs b/Logs/View.hs
index 2a26cfa17..15d472bc6 100644
--- a/Logs/View.hs
+++ b/Logs/View.hs
@@ -71,9 +71,9 @@ branchView view
where
name = intercalate ";" $ map branchcomp (viewComponents view)
branchcomp c
- | multiValue (viewFilter c) = branchcomp' c
+ | viewVisible c = branchcomp' c
| otherwise = "(" ++ branchcomp' c ++ ")"
- branchcomp' (ViewComponent metafield viewfilter)
+ branchcomp' (ViewComponent metafield viewfilter _)
| metafield == tagMetaField = branchvals viewfilter
| otherwise = concat
[ forcelegal (fromMetaField metafield)