From: morioka <morioka>
Date: Sun, 8 Nov 1998 18:08:57 +0000 (+0000)
Subject: (overlayp): New alias.
X-Git-Tag: apel-9_10~14
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=84dbaf3c56c012cfa8b0bee9c0ccf566236f3f2b;p=elisp%2Fapel.git

(overlayp): New alias.
(delete-overlay): New alias.
---

diff --git a/poe-xemacs.el b/poe-xemacs.el
index a009350..bc17426 100644
--- a/poe-xemacs.el
+++ b/poe-xemacs.el
@@ -57,11 +57,13 @@ When called interactively, prompt for the name of the color to use."
 (condition-case nil
     (require 'overlay)
   (error (defalias 'make-overlay 'make-extent)
+	 (defalias 'overlayp 'extentp)
 	 (defalias 'overlay-put 'set-extent-property)
 	 (defalias 'overlay-buffer 'extent-buffer)
 	 (defun move-overlay (extent start end &optional buffer)
 	   (set-extent-endpoints extent start end)
 	   )
+	 (defalias 'delete-overlay 'detach-extent)
 	 ))