diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2002-07-17 11:14:11 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2002-07-17 11:14:11 +0000 |
| commit | 1368aaab23275507c652c8368154f2fc3156a61c (patch) | |
| tree | 8a005574e512ca72a8d1eb3bd8ab5312a0c5beda /generic | |
| parent | 0f4feea9ca0163946b2a971657b8e71c2931044d (diff) | |
Fix span-string, span-object
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/span-overlay.el | 6 |
1 files changed, 5 insertions, 1 deletions
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) |