aboutsummaryrefslogtreecommitdiff
path: root/generic/span-overlay.el
diff options
context:
space:
mode:
authorDavid Aspinall1998-12-15 14:24:09 +0000
committerDavid Aspinall1998-12-15 14:24:09 +0000
commitb27acfc00264f2ca9265dda4c24005c9cd1ce708 (patch)
tree6e110644f17be1d7dd2393495bf22b6897f31ddb /generic/span-overlay.el
parent3e9fc0816fc333ff80d158afa26bb70e403e6b1f (diff)
Fixes for FSF Emacs handling of processes, kill buffer hooks,
and live/dead overlays.
Diffstat (limited to 'generic/span-overlay.el')
-rw-r--r--generic/span-overlay.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/generic/span-overlay.el b/generic/span-overlay.el
index 6cb572df..8289bf3d 100644
--- a/generic/span-overlay.el
+++ b/generic/span-overlay.el
@@ -273,4 +273,10 @@ If there are two spans overlapping then this won't work."
(if l (car l) nil)))
+(defsubst span-live-p (span)
+ "Return non-nil if SPAN is in a live buffer."
+ (and span
+ (overlay-buffer span)
+ (buffer-live-p (overlay-buffer span))))
+
(provide 'span-overlay)