From eed6dfdf3ad898d901e791fb3acd078be7c94ecb Mon Sep 17 00:00:00 2001
From: Gregory Burd <greg@basho.com>
Date: Sat, 3 Dec 2011 09:44:59 -0500
Subject: [PATCH] A cursor get() of an undefined Key will position the cursor.

---
 src/bdberl.erl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/bdberl.erl b/src/bdberl.erl
index fba2ce3..bd27bc3 100644
--- a/src/bdberl.erl
+++ b/src/bdberl.erl
@@ -1374,7 +1374,12 @@ cursor_get(Key) ->
     not_found | {ok, db_key(), db_value()} | db_error().
 
 cursor_get(Key, Opts) ->
-    {KeyLen, KeyBin} = to_binary(Key),
+    case Key of
+        undefined ->
+            {KeyLen, KeyBin} = {0, <<>>};
+        _ ->
+            {KeyLen, KeyBin} = to_binary(Key)
+    end,
     Flags = process_flags(Opts),
     Cmd = <<Flags:32/native, KeyLen:32/native, KeyBin/bytes>>,
     <<Result:32/signed-native>> = erlang:port_control(get_port(), ?CMD_CURSOR_GET, Cmd),