give groups names

meta-ex · Nov 17, 2013 · cd9da26 · cd9da26
1 parent c7d3700
commit cd9da26
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/meta_ex/drums.clj b/src/meta_ex/drums.clj
@@ -24,9 +24,9 @@
 
 (do
 
-  (defonce drum-g             (group))
-  (defonce drum-trigger-mix-g (group :after drum-g))
-  (defonce drum-basic-mixer-g (group :after default-mixer-g))
+  (defonce drum-g             (group "M-x Drums"))
+  (defonce drum-trigger-mix-g (group "M-x Drum Trg Mix" :after drum-g))
+  (defonce drum-basic-mixer-g (group "M-x Drum Basic Mix" :after default-mixer-g))
 
   (defonce m64-b  (audio-bus 2 "m64 basic-mixer"))
   (defonce m128-b (audio-bus 2 "m128 basic-mixer"))