From 928b2cf90fefe3719aef7741e1696a9e407646dd Mon Sep 17 00:00:00 2001
From: Stephen Diehl <stephen.m.diehl@gmail.com>
Date: Mon, 6 Oct 2014 16:03:51 -0500
Subject: [PATCH] update haddock docs

---
 src/System/Console/Repline.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/System/Console/Repline.hs b/src/System/Console/Repline.hs
index 466efa5..f4dec17 100644
--- a/src/System/Console/Repline.hs
+++ b/src/System/Console/Repline.hs
@@ -41,8 +41,7 @@ access a StateT instance to query application state.
 > completer :: Monad m => WordCompleter m
 > completer n = do
 >   let names = ["kirk", "spock", "mccoy"]
->   let matches = filter (isPrefixOf n) names
->   return $ map simpleCompletion matches
+>   return $ filter (isPrefixOf n) names
 
 Input which is prefixed by a colon (commands like \":type\" and \":help\") queries an association list of
 functions which map to custom logic. The function takes a space-separated list of augments in it's first