(bbdb-extract-field-value): Use `eword-decode-string' instead of
[elisp/tm.git] / tm-def.el
index 332a9e7..3686df9 100644 (file)
--- a/tm-def.el
+++ b/tm-def.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Id: tm-def.el,v 7.71 1997/02/13 14:29:53 morioka Exp $
+;; Version: $Id: tm-def.el,v 7.72 1997/03/06 17:52:22 morioka Exp $
 ;; Keywords: mail, news, MIME, multimedia, definition
 
 ;; This file is part of tm (Tools for MIME).
   "Create a button between FROM and TO with callback FUNC and data DATA."
   (and tm:button-face
        (tl:overlay-put (tl:make-overlay from to) 'face tm:button-face))
-  (tl:add-text-properties from to
-                         (append (and tm:mouse-face
-                                      (list 'mouse-face tm:mouse-face))
-                                 (list 'tm-callback func)
-                                 (and data (list 'tm-data data))
-                                 ))
+  (add-text-properties from to
+                      (append (and tm:mouse-face
+                                   (list 'mouse-face tm:mouse-face))
+                              (list 'tm-callback func)
+                              (and data (list 'tm-data data))
+                              ))
   )
 
 (defvar tm:mother-button-dispatcher nil)