From: morioka Date: Sun, 13 Jul 1997 16:32:21 +0000 (+0000) Subject: `tm-eword::addr-spec-to-rwl' -> `eword-addr-spec-to-rwl'. X-Git-Tag: semi-0_97~11 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0210df2059ecd12fd2f4f160f32d277654beb333;p=elisp%2Fsemi.git `tm-eword::addr-spec-to-rwl' -> `eword-addr-spec-to-rwl'. --- diff --git a/eword-encode.el b/eword-encode.el index 80e8e87..1f376ff 100644 --- a/eword-encode.el +++ b/eword-encode.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc. ;; Author: MORIOKA Tomohiko -;; Version: $Revision: 0.25 $ +;; Version: $Revision: 0.26 $ ;; Keywords: encoded-word, MIME, multilingual, header, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -36,7 +36,7 @@ ;;; (defconst eword-encode-RCS-ID - "$Id: eword-encode.el,v 0.25 1997-06-26 09:21:38 morioka Exp $") + "$Id: eword-encode.el,v 0.26 1997-07-13 16:32:21 morioka Exp $") (defconst eword-encode-version (get-version-string eword-encode-RCS-ID)) @@ -455,7 +455,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is (list (list (concat "<" (std11-addr-to-string route) ">") nil nil)) )))) -(defun tm-eword::addr-spec-to-rwl (addr-spec) +(defun eword-addr-spec-to-rwl (addr-spec) (if (eq (car addr-spec) 'addr-spec) (list (list (std11-addr-to-string (cdr addr-spec)) nil nil)) )) @@ -465,7 +465,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is (comment (nth 2 mbox)) dest) (setq dest (or (tm-eword::phrase-route-addr-to-rwl addr) - (tm-eword::addr-spec-to-rwl addr) + (eword-addr-spec-to-rwl addr) )) (if comment (setq dest