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"