Mercurial > hg > xemacs-beta

diff src/eldap.h @ 282:c42ec1d1cded r21-0b39

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0b39
author cvs
date Mon, 13 Aug 2007 10:33:18 +0200
parents 7df0dd720c89
children 57709be46d1b
line wrap: on
line diff
--- a/src/eldap.h	Mon Aug 13 10:32:23 2007 +0200
+++ b/src/eldap.h	Mon Aug 13 10:33:18 2007 +0200
@@ -38,13 +38,12 @@
 #define GC_LDAPP(x) GC_RECORDP (x, ldap)
 #define CHECK_LDAP(x) CHECK_RECORD (x, ldap)
 #define CONCHECK_LDAP(x) CONCHECK_RECORD (x, ldap)
-#define LDAP_LIVE_P(x) (EQ (x->status_symbol, Qopen))
 
-#define CHECK_LIVE_LDAP(ldap) do {                                       \
-  CHECK_LDAP (ldap);                                                     \
-  if (!LDAP_LIVE_P (XLDAP (ldap)))                                       \
-    signal_simple_error ("Attempting to access closed LDAP connection",  \
-                         ldap);                                          \
+#define CHECK_LIVE_LDAP(ldap) do {					\
+  CHECK_LDAP (ldap);							\
+  if (!XLDAP (ldap)->livep)						\
+    signal_simple_error ("Attempting to access closed LDAP connection",	\
+                         ldap);						\
 } while (0)