improve view branch name when there are a list of values
This commit is contained in:
parent
dd7b99c860
commit
c85a482136
1 changed files with 2 additions and 2 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Reference in a new issue