diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-02-19 16:35:00 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-02-19 16:35:00 -0400 |
| commit | 6cc5a966b6cbce635d47685d8497b355d520ebf2 (patch) | |
| tree | e1d94d35a32e76b3ed1adcace5cf29b9845d32ed /Logs/View.hs | |
| parent | eaf19cc8c9be6e53c0ae7a1fba48a947c41d2ee6 (diff) | |
improve view branch name when there are a list of values
Diffstat (limited to 'Logs/View.hs')
| -rw-r--r-- | Logs/View.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Logs/View.hs b/Logs/View.hs index 15d472bc6..7beb605a8 100644 --- a/Logs/View.hs +++ b/Logs/View.hs @@ -80,8 +80,8 @@ branchView view , "=" , branchvals viewfilter ] - branchvals (FilterValues set) = forcelegal $ - intercalate "," $ map fromMetaValue $ S.toList set + branchvals (FilterValues set) = intercalate "," $ + map (forcelegal . fromMetaValue) $ S.toList set branchvals (FilterGlob glob) = forcelegal glob forcelegal s | Git.Ref.legal True s = s |