From: tmorioka Date: Wed, 26 Feb 1997 03:54:17 +0000 (+0000) Subject: (tm:add-button): Use `make-overlay' directly. X-Git-Tag: Hokutetsu-Ishikawa-new~278 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=56cdbe4be82cc0ea61449061cb40623eb48fbf54;p=elisp%2Fsemi.git (tm:add-button): Use `make-overlay' directly. --- diff --git a/mime-def.el b/mime-def.el index 8e3ef69..01ca824 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.14 1997-02-26 02:42:16 tmorioka Exp $ +;; Version: $Id: mime-def.el,v 0.15 1997-02-26 03:54:17 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 - (overlay-put (tl:make-overlay from to) 'face tm:button-face)) + (overlay-put (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))