Merge the default tag into the first defined tag if any were defined
This commit is contained in:
parent
a1a6300851
commit
8c51baf726
1 changed files with 1 additions and 1 deletions
|
@ -73,7 +73,7 @@
|
|||
(length tags))
|
||||
tags)
|
||||
(if (> (length tags) 0)
|
||||
(list "herbstclient merge_tag default\n")
|
||||
(list (format #f "herbstclient merge_tag default ~s\n" (car tags)))
|
||||
'())
|
||||
(map (lambda (attribute-pair)
|
||||
(format #f "herbstclient attr ~a ~s\n"
|
||||
|
|
Loading…
Reference in a new issue