diff --git a/FRP/NetWire/Calculus.hs b/FRP/NetWire/Calculus.hs
--- a/FRP/NetWire/Calculus.hs
+++ b/FRP/NetWire/Calculus.hs
@@ -33,7 +33,7 @@
 -- | Differentiate over time.  The argument is the value before the
 -- first instant.
 --
--- Never inhibits.  Direct feedback.
+-- Never inhibits.  Feedback by delay.
 
 derivativeFrom ::
     forall m v. (Monad m, NFData v, VectorSpace v, Scalar v ~ Double) =>
@@ -44,16 +44,16 @@
     derivativeFrom' dy' y1 =
         mkGen $ \(wsDTime -> dt) y2 -> do
             let dy = (y2 ^-^ y1) ^/ dt
-            dy' `deepseq` return (Right dy', derivativeFrom' dy y2)
+            dy' `deepseq` return (Right dy, derivativeFrom' dy y2)
 
 
 -- | Integrate over time.  The argument is the integration constant.
 --
--- Never inhibits.  Direct feedback.
+-- Never inhibits.  Feedback by delay.
 
 integral :: (Monad m, NFData v, VectorSpace v, Scalar v ~ Double) => v -> Wire m v v
 integral x1 =
     mkGen $ \ws dx -> do
         let dt = wsDTime ws
             x2 = x1 ^+^ dt *^ dx
-        x1 `deepseq` return (Right x1, integral x2)
+        x1 `deepseq` return (Right x2, integral x2)
diff --git a/FRP/NetWire/Event.hs b/FRP/NetWire/Event.hs
--- a/FRP/NetWire/Event.hs
+++ b/FRP/NetWire/Event.hs
@@ -4,8 +4,8 @@
 -- License:    BSD3
 -- Maintainer: Ertugrul Soeylemez <es@ertes.de>
 --
--- Events.  None of these wires supports feedback, because they all can
--- inhibit.
+-- Event system.  None of these wires except 'event' supports feedback,
+-- because they all can inhibit.
 
 module FRP.NetWire.Event
     ( -- * Producing events
diff --git a/netwire.cabal b/netwire.cabal
--- a/netwire.cabal
+++ b/netwire.cabal
@@ -1,5 +1,5 @@
 Name:          netwire
-Version:       1.2.2
+Version:       1.2.3
 Category:      FRP, Network
 Synopsis:      Arrowized FRP implementation
 Maintainer:    Ertugrul Söylemez <es@ertes.de>