summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xmain.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/main.hs b/main.hs
index 1d06dd8..a09c9ce 100755
--- a/main.hs
+++ b/main.hs
@@ -269,7 +269,7 @@ postBootstrapR = do
let (number, context, name) = record
c <- liftIO $ update db $ AddCaller name number context
return c
- sendStatusJSON status200 $ callers
+ sendStatusJSON status200 $ ("Bootstrap complete." :: Text)
-- | Start a simple warp server on 3000