Vergara_Tech/mongodb
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

findOne: tell database to only return one

Browse source
This commit is contained in:
Scott R. Parish 2010-01-18 19:36:10 -06:00
parent 2c6905b45f
commit 3aaee6cf84
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Database/MongoDB.hs
View file

@ -262,7 +262,7 @@ find c col sel = query c col [] 0 0 sel []
-- | Query, but only return the first result, if any. -- | Query, but only return the first result, if any.
findOne :: Connection -> Collection -> Selector -> IO (Maybe BsonDoc) findOne :: Connection -> Collection -> Selector -> IO (Maybe BsonDoc)
findOne c col sel = do findOne c col sel = do
cur <- find c col sel cur <- query c col [] 0 (-1) sel []
el <- nextDoc cur el <- nextDoc cur
finish cur finish cur
return el return el