From a05731a0cc2553af0469bd9b7d6ac10cd2e6a817 Mon Sep 17 00:00:00 2001 From: Chong Yidong <cyd@gnu.org> Date: Mon, 20 Aug 2012 19:12:16 +0800 Subject: [PATCH] Make C-u C-x = report on empty overlays at point. * lisp/descr-text.el (describe-text-properties-1): Use overlays-in to report on empty overlays. Fixes: debbugs:3322 --- lisp/ChangeLog | 5 +++++ lisp/descr-text.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 97bad569955..d748214959d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-08-20 Chong Yidong <cyd@gnu.org> + + * descr-text.el (describe-text-properties-1): Use overlays-in to + report on empty overlays (Bug#3322). + 2012-08-20 Glenn Morris <rgm@gnu.org> * mail/rmailout.el (rmail-output-read-file-name): diff --git a/lisp/descr-text.el b/lisp/descr-text.el index 34d61b80d66..0c7f82d516e 100644 --- a/lisp/descr-text.el +++ b/lisp/descr-text.el @@ -140,7 +140,7 @@ otherwise." (defun describe-text-properties-1 (pos output-buffer) (let* ((properties (text-properties-at pos)) - (overlays (overlays-at pos)) + (overlays (overlays-in pos (1+ pos))) (wid-field (get-char-property pos 'field)) (wid-button (get-char-property pos 'button)) (wid-doc (get-char-property pos 'widget-doc)) -- 2.39.5