Correctly replay rotated leaf logs.

The loop was broken, it was not a loop. It is one now. The log player
will now shift ghosts from a page if a new segment's header indicates
that an exorcism has been performed.

Closes #444.

strata.js

@@ -262,6 +262,10 @@ Cursor.prototype.__defineGetter__('right', function () {
     return this._page.right.address
 })
 
+Cursor.prototype.__defineGetter__('right_', function () {
+    return this._page.right
+})
+
 Cursor.prototype.__defineGetter__('ghosts', function () {
     return this._page.ghosts
 })
@@ -1746,7 +1750,7 @@ prototype(Sheaf, 'readLeaf', cadence(function (async, page) {
     }], function (fd, stat, read) {
         page.rotation = rotation++
         this.play(fd, stat, read, page, async())
-    })
+    })()
 }))
 
 prototype(Sheaf, 'play', cadence(function (async, fd, stat, read, page) {
@@ -1780,6 +1784,10 @@ prototype(Sheaf, 'play', cadence(function (async, fd, stat, read, page) {
                             address: entry.header[2],
                             key: entry.body || null
                         }
+                        if (entry.header[3] == 0 && page.ghosts) {
+                            this.splice(page, 0, 1)
+                            page.ghosts = 0
+                        }
                         page.entries++
                     } else {
                         ok(header.entry == ++page.entries, 'entry count is off')

t/ghost/exorcise.t.js

@@ -1,6 +1,6 @@
 #!/usr/bin/env node
 
-require('./proof')(3, prove)
+require('./proof')(5, prove)
 
 function prove (async, assert) {
     var strata = new Strata({ directory: tmp, leafSize: 3, branchSize: 3 })
@@ -30,5 +30,18 @@ function prove (async, assert) {
     }, function (actual, expected) {
         assert(actual, expected, 'after')
         strata.close(async())
+    }, function () {
+        strata.open(async())
+    }, function () {
+        strata.iterator('a', async())
+    }, function (cursor) {
+        async(function () {
+            assert(cursor.right_, { key: 'd', address: 5 }, 'referring leaf updated')
+            cursor.next(async())
+        }, function () {
+            assert(cursor.get(0).key, 'd', 'key deleted')
+        }, function () {
+            cursor.unlock(async())
+        })
     })
 }