Mercurial > emacs

comparison lisp/net/eudcb-ldap.el @ 42779:897623591168

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
New maintainer. Change author's address. (eudc-attribute-display-method-alist): Display mail with eudc-display-mail.
author Pavel Janík <Pavel@Janik.cz>
date Wed, 16 Jan 2002 08:14:05 +0000
parents 281571076b02
children 695cf19ef79e d7ddb3e565de
comparison
equal deleted inserted replaced
42778:6d743d659035 42779:897623591168
1 ;;; eudcb-ldap.el --- Emacs Unified Directory Client - LDAP Backend 1 ;;; eudcb-ldap.el --- Emacs Unified Directory Client - LDAP Backend
2 2
3 ;; Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc. 3 ;; Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
4 4
5 ;; Author: Oscar Figueiredo <oscar@xemacs.org> 5 ;; Author: Oscar Figueiredo <oscar@cpe.fr>
6 ;; Maintainer: Oscar Figueiredo <oscar@xemacs.org> 6 ;; Maintainer: Pavel Janík <Pavel@Janik.cz>
7 ;; Keywords: comm 7 ;; Keywords: comm
8 8
9 ;; This file is part of GNU Emacs. 9 ;; This file is part of GNU Emacs.
10 10
11 ;; GNU Emacs is free software; you can redistribute it and/or modify 11 ;; GNU Emacs is free software; you can redistribute it and/or modify
66 (eudc-protocol-set 'eudc-attribute-display-method-alist 66 (eudc-protocol-set 'eudc-attribute-display-method-alist
67 '(("jpegphoto" . eudc-display-jpeg-inline) 67 '(("jpegphoto" . eudc-display-jpeg-inline)
68 ("labeledurl" . eudc-display-url) 68 ("labeledurl" . eudc-display-url)
69 ("audio" . eudc-display-sound) 69 ("audio" . eudc-display-sound)
70 ("labeleduri" . eudc-display-url) 70 ("labeleduri" . eudc-display-url)
71 ("mail" . eudc-display-mail)
71 ("url" . eudc-display-url)) 72 ("url" . eudc-display-url))
72 'ldap) 73 'ldap)
73 (eudc-protocol-set 'eudc-switch-to-server-hook 74 (eudc-protocol-set 'eudc-switch-to-server-hook
74 '(eudc-ldap-check-base) 75 '(eudc-ldap-check-base)
75 'ldap) 76 'ldap)