diff --git a/Language/Haskell/GhcMod/Boot.hs b/Language/Haskell/GhcMod/Boot.hs
index fef19a2..cba7341 100644
--- a/Language/Haskell/GhcMod/Boot.hs
+++ b/Language/Haskell/GhcMod/Boot.hs
@@ -10,13 +10,13 @@ import Language.Haskell.GhcMod.Lang
 import Language.Haskell.GhcMod.List
 import Language.Haskell.GhcMod.Types
 
--- | Print necessary information for front-end booting.
+-- | Printing necessary information for front-end booting.
 bootInfo :: Options -> Cradle -> IO String
 bootInfo opt cradle = withGHC' $ do
     initializeFlagsWithCradle opt cradle
     boot opt
 
--- | Print necessary information for front-end booting.
+-- | Printing necessary information for front-end booting.
 boot :: Options -> Ghc String
 boot opt = do
     mods  <- modules opt
diff --git a/Language/Haskell/GhcMod/Find.hs b/Language/Haskell/GhcMod/Find.hs
index 0a40927..63e5d77 100644
--- a/Language/Haskell/GhcMod/Find.hs
+++ b/Language/Haskell/GhcMod/Find.hs
@@ -30,7 +30,7 @@ type Symbol = String
 -- | Database from 'Symbol' to modules.
 newtype SymMdlDb = SymMdlDb (Map Symbol [ModuleString])
 
--- | Find modules to which the symbol belong.
+-- | Finding modules to which the symbol belong.
 findSymbol :: Options -> Cradle -> Symbol -> IO String
 findSymbol opt cradle sym = withGHC' $ do
     initializeFlagsWithCradle opt cradle