Mercurial > emacs

diff lisp/mh-e/mh-alias.el @ 66357:f5ade15d46f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* mh-identity.el (mh-assoc-ignore-case): Merge with version in mh-alias.el and move to mh-acros.el * mh-alias.el (mh-assoc-ignore-case): Merge with version in mh-identity.el and move to mh-acros.el * mh-acros.el (mh-assoc-ignore-case): Merge of function from mh-identity.el and mh-alias.el.
author Bill Wohler <wohler@newt.com>
date Sun, 23 Oct 2005 22:47:27 +0000
parents 4520ae2624f2
children 3a8785724cca
line wrap: on
line diff
--- a/lisp/mh-e/mh-alias.el	Sun Oct 23 22:34:34 2005 +0000
+++ b/lisp/mh-e/mh-alias.el	Sun Oct 23 22:47:27 2005 +0000
@@ -73,14 +73,6 @@
 
 ;;; Alias Loading
 
-(defmacro mh-assoc-ignore-case (key alist)
-  "Search for string KEY in ALIST.
-This is a wrapper around `assoc-string' or `assoc-ignore-case'. Avoid
-`assoc-ignore-case' which is now an obsolete function."
-  (cond ((fboundp 'assoc-string) `(assoc-string ,key ,alist t))
-        ((fboundp 'assoc-ignore-case) `(assoc-ignore-case ,key ,alist))
-        (t (error "The macro mh-assoc-ignore-case not implemented properly"))))
-
 (defun mh-alias-tstamp (arg)
   "Check whether alias files have been modified.
 Return t if any file listed in the Aliasfile MH profile component has been