diff --git a/Changelog.md b/Changelog.md
--- a/Changelog.md
+++ b/Changelog.md
@@ -1,5 +1,8 @@
 # Change log for esqueleto text search 
 
+## Version 1.3.1
++ fix doc issue to_tsquery_en
+
 ## Version 1.3.0
 + Update misleading tsquery and and or
 + expose underlying lists in search terms
diff --git a/esqueleto-textsearch.cabal b/esqueleto-textsearch.cabal
--- a/esqueleto-textsearch.cabal
+++ b/esqueleto-textsearch.cabal
@@ -1,6 +1,6 @@
 cabal-version:      3.0
 name:               esqueleto-textsearch
-version:            1.3.0
+version:            1.3.1
 synopsis:           PostgreSQL full text search for Esqueleto
 description:        PostgreSQL text search functions for Esqueleto.
 homepage:           https://github.com/jappeace/esqueleto-textsearch
diff --git a/src/Database/Esqueleto/TextSearch.hs b/src/Database/Esqueleto/TextSearch.hs
--- a/src/Database/Esqueleto/TextSearch.hs
+++ b/src/Database/Esqueleto/TextSearch.hs
@@ -6,9 +6,9 @@
 module Database.Esqueleto.TextSearch (
     toSearchTerm
   , to_tsquery_en
+  , (@@.)
   , andWords
   , orWords
-  , (@@.)
   , ts_rank
   , NormalizationOption(..)
   , module Database.Esqueleto.TextSearch.Language
diff --git a/src/Database/Esqueleto/TextSearch/Language.hs b/src/Database/Esqueleto/TextSearch/Language.hs
--- a/src/Database/Esqueleto/TextSearch/Language.hs
+++ b/src/Database/Esqueleto/TextSearch/Language.hs
@@ -70,7 +70,7 @@
 --   @
 -- searchCompany :: SqlExpr (Entity CompanySearchIndex) -> Text -> SqlQuery ()
 -- searchCompany company term = do
---   let query = to_tsquery (val "english") $ val $ andWords $ prefixAndQuery term
+--   let query = 'to_tsquery' (val "english") $ val $ 'andWords' $ 'toSearchTerm' term
 --   where_ $ (company ^. CompanySearchIndexDocument) @@. query
 --   @
 --