From 3eac21f49bc763a6c0044b4afbc0c7ece760144f Mon Sep 17 00:00:00 2001
From: markm <markm@FreeBSD.org>
Date: Sat, 16 Mar 2002 20:14:30 +0000
Subject: Vendor import Perl 5.6.1

---
 contrib/perl5/ext/NDBM_File/NDBM_File.xs | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'contrib/perl5/ext/NDBM_File/NDBM_File.xs')

diff --git a/contrib/perl5/ext/NDBM_File/NDBM_File.xs b/contrib/perl5/ext/NDBM_File/NDBM_File.xs
index 49a1db5..c417eb6 100644
--- a/contrib/perl5/ext/NDBM_File/NDBM_File.xs
+++ b/contrib/perl5/ext/NDBM_File/NDBM_File.xs
@@ -1,6 +1,11 @@
 #include "EXTERN.h"
 #include "perl.h"
 #include "XSUB.h"
+/* If using the DB3 emulation, ENTER is defined both
+ * by DB3 and Perl.  We drop the Perl definition now.
+ * See also INSTALL section on DB3.
+ * -- Stanislav Brabec <utx@penguin.cz> */
+#undef ENTER
 #include <ndbm.h>
 
 typedef struct {
-- 
cgit v1.1