From 01a58e872c7a86494c030ed84a405cb33ea9f727 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Thu, 17 Sep 1998 17:21:27 +0000
Subject: [PATCH] Define tl:overlay obsolete aliases for all emacsen.

---
 emu.el |   23 ++++++++++++++---------
 1 file changed, 14 insertions(+), 9 deletions(-)

diff --git a/emu.el b/emu.el
index 4b50e61..8dc9928 100644
--- a/emu.el
+++ b/emu.el
@@ -53,15 +53,6 @@
        (defvar mouse-button-3 'button3)
        )
       ((>= emacs-major-version 19)
-       ;; for tm-7.106
-       (defalias 'tl:make-overlay 'make-overlay)
-       (defalias 'tl:overlay-put 'overlay-put)
-       (defalias 'tl:overlay-buffer 'overlay-buffer)
-       
-       (make-obsolete 'tl:make-overlay 'make-overlay)
-       (make-obsolete 'tl:overlay-put 'overlay-put)
-       (make-obsolete 'tl:overlay-buffer 'overlay-buffer)
-       
        ;; mouse
        (defvar mouse-button-1 [mouse-1])
        (defvar mouse-button-2 [mouse-2])
@@ -74,6 +65,20 @@
        (defvar mouse-button-3 nil)
        ))
 
+;; for tm-7.106
+(unless (fboundp 'tl:make-overlay)
+  (defalias 'tl:make-overlay 'make-overlay)
+  (make-obsolete 'tl:make-overlay 'make-overlay)
+  )
+(unless (fboundp 'tl:overlay-put)
+  (defalias 'tl:overlay-put 'overlay-put)
+  (make-obsolete 'tl:overlay-put 'overlay-put)
+  )
+(unless (fboundp 'tl:overlay-put)
+  (defalias 'tl:overlay-buffer 'overlay-buffer)
+  (make-obsolete 'tl:overlay-buffer 'overlay-buffer)
+  )
+
 (require 'poem)
 (require 'mcharset)
 
-- 
1.7.10.4