Permalink
Browse files

Ops fix debug function

  • Loading branch information...
1 parent e04dd59 commit 35a9042ccfd1916342fae87dad65d7d9145a56a6 @ozataman ozataman committed Jan 31, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Database/Cassandra/Basic.hs
@@ -63,7 +63,7 @@ import Database.Cassandra.Types
test = do
- pool <- createCassandraPool [("127.0.0.1", PortNumber 9160)] 3 300 "Keyspace1"
+ pool <- createCassandraPool [("127.0.0.1", 9160)] 3 300 "Keyspace1"
withPool pool $ \ Cassandra{..} -> do
let cp = T.ColumnParent (Just "CF1") Nothing
let sr = Just $ T.SliceRange (Just "") (Just "") (Just False) (Just 100)

0 comments on commit 35a9042

Please sign in to comment.