diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,9 @@
+## 0.2.1.3
+* Fix the parameter order of `<=<`.
+
+## 0.2.1.2
+* Improve documentation.
+
 ## 0.2.1.1
 * Fix dead links in documentation.
 
diff --git a/control-dsl.cabal b/control-dsl.cabal
--- a/control-dsl.cabal
+++ b/control-dsl.cabal
@@ -2,10 +2,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 3d963a3b297adf76cb7ad8c4341ee909913452fb539ebff4848ba4a18260fbb8
+-- hash: 02d3000abf78ee647c13ef74806172f793fb4a899dff1e2a93846efb75b86dbd
 
 name:           control-dsl
-version:        0.2.1.2
+version:        0.2.1.3
 synopsis:       An alternative to monads for control flow DSLs
 description:    This \"control-dsl\" package is a toolkit to create extensible Domain Specific Languages in @do@-notation.
                 .
diff --git a/src/Control/Dsl/Dsl.hs b/src/Control/Dsl/Dsl.hs
--- a/src/Control/Dsl/Dsl.hs
+++ b/src/Control/Dsl/Dsl.hs
@@ -114,7 +114,7 @@
 
 (f >=> g) k = f k >>= g
 
-f <=< g = f >=> g
+f <=< g = g >=> f
 
 -- | The implementation of statements with no value in a @do@ block.
 k >> a = cpsApply k $ const a