diff options
| author | Pierre Courtieu | 2004-03-10 15:13:43 +0000 |
|---|---|---|
| committer | Pierre Courtieu | 2004-03-10 15:13:43 +0000 |
| commit | 1492a2e4757dac1c5ccb3b385c033bf48093cbd3 (patch) | |
| tree | 8d9f1f764f1802430441cf5055cbdda880fccd73 /generic/span-overlay.el | |
| parent | aa621a47a220d344a2cb88e7a126e99038ca3fb7 (diff) | |
modification to avoid compile warnings (end)
+ some menu modifications
Diffstat (limited to 'generic/span-overlay.el')
| -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 36a04458..e22c38a4 100644 --- a/generic/span-overlay.el +++ b/generic/span-overlay.el @@ -232,7 +232,7 @@ Re-attaches SPAN if it was removed from the buffer." (defsubst mapcar-spans (fn start end prop &optional val) "Apply function FN to all spans between START and END with property PROP set" - (mapcar fn (spans-at-region-prop start end prop val))) + (mapcar fn (spans-at-region-prop start end prop (or val nil)))) (defun map-spans-aux (f l) (cond (l (cons (funcall f l) (map-spans-aux f (span-property l 'before)))) |