Procházet zdrojové kódy

also, backticks need to be escaped

Aneurin Barker Snook před 8 roky
rodič
revize
ce4e702dd4
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      snippets/hsetup

+ 1 - 1
snippets/hsetup

@@ -6,7 +6,7 @@
 # --
 let bpm b = cps (b/60)
     withmod a b c d = (whenmod a b . within (c, d))
-    every' n o f = when ((== (o-1)) . (`mod` n)) f
+    every' n o f = when ((== (o-1)) . (\`mod\` n)) f
     msil = mapM_ ($ silence)
     tmod s e = (# nudge (scale 0 s $ fmap (**e) saw1))
     swing a = within (0.1, 0.4) (a ~>) . within (0.6, 0.9) (a ~>)