summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-alias.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mh-e/mh-alias.el')
-rw-r--r--lisp/mh-e/mh-alias.el8
1 files changed, 0 insertions, 8 deletions
diff --git a/lisp/mh-e/mh-alias.el b/lisp/mh-e/mh-alias.el
index d72036fe25d..5367d2cbc18 100644
--- a/lisp/mh-e/mh-alias.el
+++ b/lisp/mh-e/mh-alias.el
@@ -73,14 +73,6 @@ You can update the alias list manually using \\[mh-alias-reload].")
;;; 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