diff --git a/src/Database/Esqueleto/Internal/Sql.hs b/src/Database/Esqueleto/Internal/Sql.hs
index a5613d2..ec4578e 100644
--- a/src/Database/Esqueleto/Internal/Sql.hs
+++ b/src/Database/Esqueleto/Internal/Sql.hs
@@ -668,11 +668,6 @@ unsafeSqlValue :: TLB.Builder -> SqlExpr (Value a)
 unsafeSqlValue v = ERaw Never $ const (v, mempty)
 {-# INLINE unsafeSqlValue #-}
 
--- | (Internal) A raw SQL ordering.  The same warning from
--- 'unsafeSqlBinOp' applies to this function as well.
-unsafeSqlOrderBy :: TLB.Builder -> SqlExpr OrderBy
-unsafeSqlOrderBy v = ERaw Never $ const (v, mempty)
-{-# INLINE unsafeSqlOrderBy #-}
 
 -- | (Internal) A raw SQL function.  Once again, the same warning
 -- from 'unsafeSqlBinOp' applies to this function as well.