X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=mh-e%2Ftm-mh-e.el;h=1bbff3a5096f5a2228094bb157d823bc3100d217;hb=227a9b3b792a6e82efbeb3a4fdb2490ff7049429;hp=b1bb8cfa4630f8fb2df6e6e91cfa6bf46585eeab;hpb=d6dfd9fac33e6c563ad626595d22766fd59d3eaa;p=elisp%2Ftm.git diff --git a/mh-e/tm-mh-e.el b/mh-e/tm-mh-e.el index b1bb8cf..1bbff3a 100644 --- a/mh-e/tm-mh-e.el +++ b/mh-e/tm-mh-e.el @@ -9,7 +9,7 @@ ;;; modified by YAMAOKA Katsumi ;;; Maintainer: MORIOKA Tomohiko ;;; Created: 1993/11/21 (obsolete mh-e-mime.el) -;;; Version: $Revision: 7.44 $ +;;; Version: $Revision: 7.46 $ ;;; Keywords: mail, MH, MIME, multimedia, encoded-word, multilingual ;;; ;;; This file is part of tm (Tools for MIME). @@ -47,7 +47,7 @@ ;;; (defconst tm-mh-e/RCS-ID - "$Id: tm-mh-e.el,v 7.44 1995/12/13 05:48:43 morioka Exp $") + "$Id: tm-mh-e.el,v 7.46 1996/01/23 04:51:18 morioka Exp $") (defconst tm-mh-e/version (get-version-string tm-mh-e/RCS-ID)) @@ -399,8 +399,6 @@ then prompt for the message sequence. See also documentation for )))) (or msg-or-seq (setq msg-or-seq (mh-get-msg-num t))) - (if (numberp msg-or-seq) - (setq msg-or-seq (int-to-string msg-or-seq))) (let* ((folder mh-current-folder) (config (current-window-configuration)) ;; uses "draft" for compatibility with forw. @@ -595,6 +593,17 @@ then prompt for the message sequence. See also documentation for ))) +;;; @ for BBDB +;;; + +(call-after-loaded + 'bbdb + (function + (lambda () + (require 'tm-bbdb) + ))) + + ;;; @ set up ;;; @@ -651,3 +660,5 @@ then prompt for the message sequence. See also documentation for (provide 'tm-mh-e) (run-hooks 'tm-mh-e-load-hook) + +;;; tm-mh-e.el ends here