From: tmorioka Date: Wed, 26 Feb 1997 02:42:16 +0000 (+0000) Subject: (tm:add-button): Use `overlay-put' directly. X-Git-Tag: Hokutetsu-Ishikawa-new~279 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=de68cedb7a8ed206310d7b8b4873ea438e819561;p=elisp%2Fsemi.git (tm:add-button): Use `overlay-put' directly. --- diff --git a/mime-def.el b/mime-def.el index 8cab856..8e3ef69 100644 --- a/mime-def.el +++ b/mime-def.el @@ -3,7 +3,7 @@ ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc. ;; Author: MORIOKA Tomohiko -;; Version: $Id: mime-def.el,v 0.13 1997-02-25 07:29:59 tmorioka Exp $ +;; Version: $Id: mime-def.el,v 0.14 1997-02-26 02:42:16 tmorioka Exp $ ;; Keywords: definition, MIME, multimedia, mail, news ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). @@ -66,7 +66,7 @@ (defun tm:add-button (from to func &optional data) "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)) + (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))