diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2000-06-27 15:28:01 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2000-06-27 15:28:01 +0000 |
| commit | df468ad4543d7ad3bda417f68ef53e2262ad5aea (patch) | |
| tree | 46d0592429c7496bb83094f7cdad97dd1cdd8146 | |
| parent | 61e83559cb7614a71834f3c513c6638d54e89904 (diff) | |
Minor tweak.
| -rw-r--r-- | generic/span-overlay.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/span-overlay.el b/generic/span-overlay.el index 5e64772e..f1f6d6a9 100644 --- a/generic/span-overlay.el +++ b/generic/span-overlay.el @@ -271,7 +271,7 @@ If there are two spans overlapping then this won't work." (let ((l (member-if (lambda (span) (span-property span prop)) (overlays-at (next-overlay-change (overlay-start span)))))) - (if l (car l) nil))) + (car-safe l))) (defsubst span-live-p (span) |