Some fixes in docs

diff --git a/Framework/Controller.hs b/Framework/Controller.hs
index 9a7bf9b..392f09c 100644
--- a/Framework/Controller.hs
+++ b/Framework/Controller.hs
@@ -6,7 +6,7 @@
 -- third are types of possible results of controller.
 --
 -- There are three possible ways to combine Controller actions. First, you can
--- execute actions one by one, just as in IO monad. Secondly, if you decode
+-- execute actions one by one, just as in IO monad. Secondly, if you decide
 -- that you already have a result, you can return that result with @returnNow@
 -- function -- all subsequent computations will not be executed. Third, you can
 -- at any moment reject all the computation (in application controller, this
@@ -137,8 +137,9 @@ evalController m s = anyResult `fmap` (runController m s)
         anyResult (Result r) = Just r


-evalRightNow :: Controller s r a
-             -> s
+-- | Same as @evalController@, but return a value only if controller returns RightNow v.
+evalRightNow :: Controller s r a                 -- ^ Controller
+             -> s                                -- ^ Configuration for controller
              -> IO (Maybe r)
 evalRightNow m s = anyResult `fmap` (runController m s)
     where