From 8ba2edef014332a1fbfc89434141f7d2cf598176 Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Mon, 9 Mar 1998 07:34:48 +0000
Subject: [PATCH] tm 6.80.

---
 Makefile      |    2 +-
 emu-xemacs.el |   39 ++++++++++++++++++++-------------------
 2 files changed, 21 insertions(+), 20 deletions(-)

diff --git a/Makefile b/Makefile
index 27fda11..e627c27 100644
--- a/Makefile
+++ b/Makefile
@@ -18,7 +18,7 @@ TLDIR19 = $(HOME)/lib/emacs19/lisp
 
 FILES	= tl/README.eng tl/Makefile tl/mk-tl tl/*.el tl/doc/*.texi
 
-TARFILE = tl-6.6.2.tar
+TARFILE = tl-6.6.3.tar
 
 
 elc:
diff --git a/emu-xemacs.el b/emu-xemacs.el
index 7be0fc7..adf7ea7 100644
--- a/emu-xemacs.el
+++ b/emu-xemacs.el
@@ -1,7 +1,7 @@
 ;;;
 ;;; emu-xemacs: Emacs 19 emulation module for XEmacs
 ;;;
-;;; $Id: emu-xemacs.el,v 2.0 1995/09/08 17:47:54 morioka Exp $
+;;; $Id: emu-xemacs.el,v 3.0 1995/09/10 13:31:51 morioka Exp $
 ;;;
 
 (or (fboundp 'face-list)
@@ -16,23 +16,24 @@
 (or (face-differs-from-default-p 'underline)
     (set-face-underline-p 'underline t))
 
-(or (fboundp 'set-text-properties)
-    (defun set-text-properties (start end props &optional buffer)
-      (if (or (null buffer) (bufferp buffer))
-	  (if props
-	      (while props
-		(put-text-property 
-		 start end (car props) (nth 1 props) buffer)
-		(setq props (nthcdr 2 props)))
-	    (remove-text-properties start end ())
-	    )))
-    )
-
-(defalias 'make-overlay 'make-extent)
-(defalias 'overlay-put 'set-extent-property)
-
-(defun move-overlay (extent start end &optional buffer)
-  (set-extent-endpoints extent start end)
-  )
+;;; (or (fboundp 'set-text-properties)
+;;;     (defun set-text-properties (start end props &optional buffer)
+;;;       (if (or (null buffer) (bufferp buffer))
+;;;           (if props
+;;;               (while props
+;;;                 (put-text-property 
+;;;                  start end (car props) (nth 1 props) buffer)
+;;;                 (setq props (nthcdr 2 props)))
+;;;             (remove-text-properties start end ())
+;;;             )))
+;;;     )
+;;; 
+;;; (defalias 'make-overlay 'make-extent)
+;;; (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)
+;;;   )
 
 (provide 'emu-xemacs)
-- 
1.7.10.4