XEmacs 21.2.12

[chise/xemacs-chise.git.1] / src / database.c

diff --git a/src/database.c b/src/database.c
index 350f9af..8450333 100644 (file)
--- a/src/database.c
+++ b/src/database.c
@@ -501,7 +501,11 @@ berkdb_map (Lisp_Database *db, Lisp_Object func)
   {
     DBC *dbcp;
 
+#if DB_VERSION_MAJOR > 2 || DB_VERSION_MINOR >=6
+    status = dbp->cursor (dbp, NULL, &dbcp, 0);
+#else
     status = dbp->cursor (dbp, NULL, &dbcp);
+#endif   
     for (status = dbcp->c_get (dbcp, &keydatum, &valdatum, DB_FIRST);
         status == 0;
         status = dbcp->c_get (dbcp, &keydatum, &valdatum, DB_NEXT))