Mercurial > hg > xemacs-beta

comparison modules/ldap/eldap.c @ 388:aabb7f5b1c81 r21-2-9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-9
author cvs
date Mon, 13 Aug 2007 11:09:42 +0200
parents 8efd647ea9ca
children
comparison
equal deleted inserted replaced
387:f892a9d0bb8d 388:aabb7f5b1c81
26 conforming to the API defined in RFC 1823. 26 conforming to the API defined in RFC 1823.
27 It has been tested with: 27 It has been tested with:
28 - UMich LDAP 3.3 (http://www.umich.edu/~dirsvcs/ldap/) 28 - UMich LDAP 3.3 (http://www.umich.edu/~dirsvcs/ldap/)
29 - Netscape's LDAP SDK 1.0 (http://developer.netscape.com) */ 29 - Netscape's LDAP SDK 1.0 (http://developer.netscape.com) */
30 30
31 31 #include <emodules.h>
32
33 #include <config.h>
34 32
35 #if defined (HAVE_LDAP) 33 #if defined (HAVE_LDAP)
36
37 /* The entire file is within this conditional */ 34 /* The entire file is within this conditional */
38
39 #include "lisp.h"
40 35
41 #include "eldap.h" 36 #include "eldap.h"
42 #include <lber.h> 37 #include <lber.h>
43 #include <ldap.h> 38 #include <ldap.h>
44 39
407 UNGCPRO; 402 UNGCPRO;
408 return result; 403 return result;
409 } 404 }
410 405
411 void 406 void
412 syms_of (void) 407 syms_of_ldap (void)
413 { 408 {
414 DEFSUBR(Fldap_search_internal); 409 DEFSUBR(Fldap_search_internal);
415 410
416 defsymbol (&Qhost, "host"); 411 defsymbol (&Qhost, "host");
417 defsymbol (&Qfilter, "filter"); 412 defsymbol (&Qfilter, "filter");
438 defsymbol (&Qalways, "always"); 433 defsymbol (&Qalways, "always");
439 defsymbol (&Qfind, "find"); 434 defsymbol (&Qfind, "find");
440 } 435 }
441 436
442 void 437 void
443 vars_of (void) 438 vars_of_ldap (void)
444 { 439 {
445 Fprovide (intern ("ldap-internal")); 440 Fprovide (intern ("ldap-internal"));
446 441
447 DEFVAR_LISP ("ldap-default-host", &Vldap_default_host /* 442 DEFVAR_LISP ("ldap-default-host", &Vldap_default_host /*
448 Default LDAP host. 443 Default LDAP host.