diff --git a/gnu/packages/haskell.scm b/gnu/packages/haskell.scm
index 48da78bb9..3b93d8628 --- a/gnu/packages/haskell.scm
+++ b/gnu/packages/haskell.scm
@@ -9193,48 +9193,10 @@ the local code")
     (description "This package contains helper functions on top of
 Template Haskell.
 
-@code{functionExtractor} extracts all functions after a regexp-pattern.
-
-@verbatim
- foo = \"test\"
- boo = \"testing\"
- bar = $\(functionExtractor \"oo$\")
-@end verbatim
-
-will automagically extract the functions ending with @code{oo} such as
-
-@verbatim
- bar = [\(\"foo\",foo), \(\"boo\",boo)]
-@end verbatim
-
-This can be useful if you wish to extract all functions beginning
-with test \(for a test-framework) or all functions beginning with wc
-\(for a web service).
-
-@code{functionExtractorMap} works like @code{functionsExtractor} but
-applies a function over all function-pairs.
-
-This functions is useful if the common return type of the functions is
-a type class.
-
-Example:
-
-@verbatim
- secondTypeclassTest =
-   do let expected = [\"45\", \"88.8\", \"\\\"hej\\\"\"]
-          actual = $\(functionExtractorMap \"^tc\" [|\\n f -> show f|] )
-      expected @=? actual
-
- tcInt :: Integer
- tcInt = 45
-
- tcDouble :: Double
- tcDouble = 88.8
-
- tcString :: String
- tcString = \"hej\"
-@end verbatim
-")
+For example, @code{functionExtractor} extracts all functions after a
+regexp-pattern, which can be useful if you wish to extract all functions
+beginning with @code{test} (for a test-framework) or all functions beginning
+with @code{wc} (for a web service).")
     (license license:bsd-3)))
 
 ;;; haskell.scm ends here