diff options
| author |  Tom Willemse | 2022-04-15 23:39:06 -0700 |
|---|---|---|
| committer | Tom Willemse | 2022-04-15 23:39:06 -0700 |
| commit | 8c51baf7267f0725e6b98c8a554d6593f7066ae6 (patch) | |
| tree | 79f9d303e844b3d202a193198741df5324cc898f | |
| parent | a1a6300851347567b346a8df28260e337520fee7 (diff) | |
| download | new-dotfiles-8c51baf7267f0725e6b98c8a554d6593f7066ae6.tar.gz new-dotfiles-8c51baf7267f0725e6b98c8a554d6593f7066ae6.zip | |
Merge the default tag into the first defined tag if any were defined
| -rw-r--r-- | oni/home/services/herbstluftwm.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/oni/home/services/herbstluftwm.scm b/oni/home/services/herbstluftwm.scm index 0b73ce5..2d0ef82 100644 --- a/oni/home/services/herbstluftwm.scm +++ b/oni/home/services/herbstluftwm.scm @@ -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" |