ITS#9007 don't free loose writemap pages

Broken in ITS#8756

diff --git a/libraries/liblmdb/mdb.c b/libraries/liblmdb/mdb.c
index 68b754905bf95b05593be0a9937bae011bdd0a61..a621046167953851f36acb034e91fd9066d95f0b 100644 (file)
--- a/libraries/liblmdb/mdb.c
+++ b/libraries/liblmdb/mdb.c
@@ -3693,9 +3693,9 @@ mdb_freelist_save(MDB_txn *txn)
                        } else {
                                x = mdb_mid2l_search(dl, mp->mp_pgno);
                                mdb_tassert(txn, dl[x].mid == mp->mp_pgno);
+                               mdb_dpage_free(env, mp);
                        }
                        dl[x].mptr = NULL;
-                       mdb_dpage_free(env, mp);
                }
                {
                        /* squash freed slots out of the dirty list */