[mew-dist 26393] mew-ldap.el

[Shun-ichi TAHARA ( 田原 俊一 )]

mew-ldap.el を case 対応にしてみました。4.2.50 以前 (mew-case-output
を見る)でも 4.2.51 以降 (mew-case を見る)でも動きます。

後藤さんのところ ( http://www.taiyo.co.jp/~gotoh/mew.html ) の最新版に
対するパッチを添付します。

ただ、現状の mew-ldap.el は、パラメータの変数が長すぎて、そのまま case
に対応させると、config-alist で LDAP まわりのキーだけが長すぎるような
気がしたので、変数名を変更しています。

オリジナル                        変更後                 caseエントリ
---------------------------------:----------------------:--------------------
mew-ldap-use                      (変更せず)             "ldap-use"
mew-ldap-server                   (変更せず)             "ldap-server"
mew-ldap-use-substring-search     mew-ldap-search-substr "ldap-search-substr"
mew-ldap-use-local-lang-value     mew-ldap-l10n-cn       "ldap-l10n-cn"
mew-ldap-local-lang-charset       mew-ldap-l10n-charset  "ldap-l10n-charset"
mew-ldap-alias-dn-level           mew-ldap-dn-level      "ldap-dn-level"
mew-ldap-alternative-dn-type-list mew-ldap-attr-list     "ldap-attr-list"

また、元々は ldap-server == nil だと、(ldap-use == nil での TAB のよう
に) LDAP を使わない通常の TAB 展開でもワーニングが表示されていたのです
が、これはやめました。現在のケースで ldap-server == nil になる場合は、
C-u TAB でも LDAP を使わずに通常のアドレス帳検索を行ないます。

ldap-use は LDAP のスイッチではなく、TAB のみでも LDAP を使うかどうか
のスイッチなので、特定の case で LDAP を使わない場合は、ldap-use では
なく ldap-server を nil にする必要があります。

# case 対応にしてみると、このへんの仕様は直感的ではないので、ldap-use
# は名前を変えた方がいいのかもしれません。ldap-always-query あたり?
＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
田原 俊一   jado at example.com, shunichi_tahara at example.com
                                  http://flowernet.gr.jp/jado/
FingerPrint:  16 9E 70 3B 05 86 5D 08  B8 4C 47 3A E7 E9 8E D9
￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
-------------- next part --------------
テキスト形式以外の添付ファイルを保管しました...
ファイル名: mew-ldap.el.patch
型:         application/octet-stream
サイズ:     15148 バイト
説明:       無し
URL:        <http://www.mew.org/pipermail/mew-dist/attachments/20050602/818c4107/attachment.obj>