diff --git a/src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs b/src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs
--- a/src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs
+++ b/src/Synthesizer/MIDI/CausalIO/ControllerSelection.hs
@@ -71,7 +71,7 @@
           (\evs curMap ->
              let ctrlEvs =
                     fmap (Maybe.mapMaybe (\(cc, val) ->
-                       fmap (mapSnd ($val)) $ Map.lookup cc dict)) evs
+                       fmap (mapSnd ($ val)) $ Map.lookup cc dict)) evs
              in  (PCS.Cons curMap ctrlEvs,
                   mapInsertMany
                      (concat $ EventListTT.getBodies ctrlEvs)
diff --git a/src/Synthesizer/MIDI/CausalIO/Process.hs b/src/Synthesizer/MIDI/CausalIO/Process.hs
--- a/src/Synthesizer/MIDI/CausalIO/Process.hs
+++ b/src/Synthesizer/MIDI/CausalIO/Process.hs
@@ -296,8 +296,7 @@
 
 instance Monoid NoteOffList where
    mempty = NoteOffList (EventListTT.pause mempty)
-   mappend (NoteOffList xs) (NoteOffList ys) =
-      NoteOffList (mappend xs ys)
+   mappend = (<>)
 
 {- |
 The function defined here are based on the interpretation
diff --git a/src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs b/src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs
--- a/src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs
+++ b/src/Synthesizer/MIDI/Dimensional/Example/Instrument.hs
@@ -72,7 +72,7 @@
    do decay <-
          fmap (SigC.store dur) $
          CtrlR.exponential2 (DN.time 0.4)
-      end <- fmap (AnaA.endPrimitive zero) $ fmap ($decay) SigA.embedSampleRate
+      end <- fmap (AnaA.endPrimitive zero) $ fmap ($ decay) SigA.embedSampleRate
       release <-
          SigA.store (DN.time 0.01) $:
          (CutR.take (DN.time 0.3) $:
diff --git a/src/Synthesizer/MIDI/Value/BendWheelPressure.hs b/src/Synthesizer/MIDI/Value/BendWheelPressure.hs
--- a/src/Synthesizer/MIDI/Value/BendWheelPressure.hs
+++ b/src/Synthesizer/MIDI/Value/BendWheelPressure.hs
@@ -53,7 +53,7 @@
 check chan ev =
    sequence $
    (fmap (>> get)) $
-   msum $ map ($ev) $
+   msum $ map ($ ev) $
       (fmap (AccState.set bend) . Check.pitchBend chan) :
       (fmap (AccState.set wheel) . Check.controller chan VoiceMsg.modulation) :
       (fmap (AccState.set pressure) . Check.channelPressure chan) :
diff --git a/synthesizer-midi.cabal b/synthesizer-midi.cabal
--- a/synthesizer-midi.cabal
+++ b/synthesizer-midi.cabal
@@ -1,5 +1,5 @@
 Name:           synthesizer-midi
-Version:        0.6.1.1
+Version:        0.6.1.2
 License:        GPL
 License-File:   LICENSE
 Author:         Henning Thielemann <haskell@henning-thielemann.de>
@@ -19,7 +19,7 @@
 Build-Type:     Simple
 
 Source-Repository this
-  Tag:         0.6.1.1
+  Tag:         0.6.1.2
   Type:        darcs
   Location:    http://code.haskell.org/synthesizer/midi/
 
@@ -50,7 +50,7 @@
     data-accessor >=0.2.1 && <0.3,
     containers >=0.1 && <0.7,
     array >=0.1 && <0.6,
-    transformers >=0.2 && <0.6,
+    transformers >=0.2 && <0.7,
     semigroups >=0.1 && <1.0,
     utility-ht >=0.0.1 && <0.1
 
