From dc2f8aa03106160190df6717cfd9b772a594e28c Mon Sep 17 00:00:00 2001 From: Brian Gianforcaro Date: Tue, 26 Jan 2010 04:03:59 -0500 Subject: [PATCH] Fix small white space error --- Database/MongoDB.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Database/MongoDB.hs b/Database/MongoDB.hs index f157d9a..0499791 100644 --- a/Database/MongoDB.hs +++ b/Database/MongoDB.hs @@ -130,7 +130,7 @@ serverInfo c = -- -- Force a clean exit, flushing and closing all data files. -- Note that it will wait until all ongoing operations are complete. -serverShutdown:: Connection -> IO BsonDoc +serverShutdown :: Connection -> IO BsonDoc serverShutdown c = runCommand c (s2L "admin") $ toBsonDoc [("shutdown", toBson (1::Int))]