;; Author: Oscar Figueiredo <Oscar.Figueiredo@di.epfl.ch>
;; Maintainer: Oscar Figueiredo <Oscar.Figueiredo@di.epfl.ch>
;; Created: Jan 1998
-;; Version: $Revision: 1.7.2.3 $
+;; Version: $Revision: 1.7.2.6 $
;; Keywords: help comm
;; This file is part of XEmacs
:type 'symbol
:group 'ldap)
-(defcustom ldap-coding-system (if (featurep 'mule)
- 'utf-8
- nil)
+(defcustom ldap-coding-system nil
"*Coding system of LDAP string values.
LDAP v3 specifies the coding system of strings to be UTF-8.
Mule support is needed for this."
(error "Invalid country string: %s" str)))
(defun ldap-decode-string (str)
- (decode-coding-string str ldap-coding-system))
+ (if (fboundp 'decode-coding-string)
+ (decode-coding-string str ldap-coding-system)))
(defun ldap-encode-string (str)
- (encode-coding-string str ldap-coding-system))
+ (if (fboundp 'encode-coding-string)
+ (encode-coding-string str ldap-coding-system)))
(defun ldap-decode-address (str)
(mapconcat 'ldap-decode-string