quickstart make-post fails

[jhgilles@…]

On Intel Macbook Pro 10.6.3
Everything works until:

(define p

(make-post #:title "Welcome to my blog"

#:body "This is my first entry, yay!"))

. . /Users/john/Library/PLT Scheme/planet/300/4.2.5/cache/jaymccarthy/mongodb.plt/1/4/basic/driver.ss:

(file

/Users/john/Library/PLT Scheme/planet/300/4.2.5/cache/jaymccarthy/mongodb.plt/1/4/orm/dict.ss)

broke the contract

(-> mongo-db? string? mongo-collection?) on make-mongo-collection; expected <mongo-db?>, given: #f

[jaymccarthy]

Fixed in 1.5