changeset 990:4700aface1ab

[xemacs-hg @ 2002-09-03 02:32:09 by james] Fix #endif comment. Change Fldap_status to Fldap_live_p to match Lisp name.
author james
date Tue, 03 Sep 2002 02:32:12 +0000
parents 97b958758756
children a28c97bd4634
files src/ChangeLog src/eldap.c src/eldap.h
diffstat 3 files changed, 13 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/src/ChangeLog	Mon Sep 02 06:40:15 2002 +0000
+++ b/src/ChangeLog	Tue Sep 03 02:32:12 2002 +0000
@@ -1,3 +1,12 @@
+2002-08-29  Jerry James  <james@xemacs.org>
+
+	* eldap.c: Put #endif tokens in a comment.
+
+	* eldap.c (Fldap_status):
+	* eldap.c (syms_of_eldap):
+	* eldap.h:
+	Change to Fldap_live_p to match Lisp name.
+
 2002-08-19  Andy Piper  <andy@xemacs.org>
 
 	* fileio.c (Ffile_truename): on cygwin using win32 normalize to
--- a/src/eldap.c	Mon Sep 02 06:40:15 2002 +0000
+++ b/src/eldap.c	Tue Sep 03 02:32:12 2002 +0000
@@ -103,7 +103,7 @@
   { XD_LISP_OBJECT, offsetof (struct Lisp_LDAP, host) },
   { XD_END }
 };
-#endif USE_KKCC
+#endif /* USE_KKCC */
 
 static Lisp_Object
 mark_ldap (Lisp_Object obj)
@@ -183,7 +183,7 @@
   return (XLDAP (ldap))->host;
 }
 
-DEFUN ("ldap-live-p", Fldap_status, 1, 1, 0, /*
+DEFUN ("ldap-live-p", Fldap_live_p, 1, 1, 0, /*
 Return t if LDAP is an active LDAP connection.
 */
        (ldap))
@@ -825,7 +825,7 @@
 
   DEFSUBR (Fldapp);
   DEFSUBR (Fldap_host);
-  DEFSUBR (Fldap_status);
+  DEFSUBR (Fldap_live_p);
   DEFSUBR (Fldap_open);
   DEFSUBR (Fldap_close);
   DEFSUBR (Fldap_search_basic);
--- a/src/eldap.h	Mon Sep 02 06:40:15 2002 +0000
+++ b/src/eldap.h	Tue Sep 03 02:32:12 2002 +0000
@@ -58,7 +58,7 @@
 
 Lisp_Object Fldapp (Lisp_Object object);
 Lisp_Object Fldap_host (Lisp_Object ldap);
-Lisp_Object Fldap_status (Lisp_Object ldap);
+Lisp_Object Fldap_live_p (Lisp_Object ldap);
 Lisp_Object Fldap_open (Lisp_Object host,
                         Lisp_Object ldap_plist);
 Lisp_Object Fldap_close (Lisp_Object ldap);