From 1368aaab23275507c652c8368154f2fc3156a61c Mon Sep 17 00:00:00 2001
From: David Aspinall
Date: Wed, 17 Jul 2002 11:14:11 +0000
Subject: Fix span-string, span-object

---
 generic/span-overlay.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/generic/span-overlay.el b/generic/span-overlay.el
index 977399b2..38a1b679 100644
--- a/generic/span-overlay.el
+++ b/generic/span-overlay.el
@@ -317,6 +317,10 @@ FIXME: new hack added nov 99 because of disappearing overlays.
 Behaviour is still worse than before."
   (set-span-property span 'priority 100))
 
-(defalias 'span-object 'overlay-object)
+(defalias 'span-object 'overlay-buffer)
+
+(defun span-string (span)
+  (with-current-buffer (overlay-buffer span)
+    (buffer-substring (overlay-start span) (overlay-end span))))
 
 (provide 'span-overlay)
-- 
cgit v1.2.3