From f9914209c8c0a7dad6a29defb2cf3c6664d6dc8a Mon Sep 17 00:00:00 2001 From: Vinicius Jose Latorre Date: Fri, 1 Dec 2006 21:03:19 +0000 Subject: [PATCH] Fix the highlight overlay extension --- lisp/ChangeLog | 4 ++++ lisp/paren.el | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index fd3a2a50103..cc1982b69c6 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -4,6 +4,10 @@ 2006-12-01 Vinicius Jose Latorre + * paren.el: Fix the highlight overlay extension when the user types a + sequence of char very fast just after the open parenthesis. + Suggested by Ben North . + * ps-mule.el: Eliminate Emacs 20 compatibility. * ps-print.el: Eliminate Emacs 20 & 21 compatibility. diff --git a/lisp/paren.el b/lisp/paren.el index 29506174c6b..fe928045765 100644 --- a/lisp/paren.el +++ b/lisp/paren.el @@ -220,7 +220,7 @@ in `show-paren-style' after `show-paren-delay' seconds of Emacs idle time." (point)))) (if show-paren-overlay-1 (move-overlay show-paren-overlay-1 from to (current-buffer)) - (setq show-paren-overlay-1 (make-overlay from to))) + (setq show-paren-overlay-1 (make-overlay from to nil t))) ;; Always set the overlay face, since it varies. (overlay-put show-paren-overlay-1 'priority show-paren-priority) (overlay-put show-paren-overlay-1 'face face))) @@ -243,7 +243,7 @@ in `show-paren-style' after `show-paren-delay' seconds of Emacs idle time." (forward-point (- dir)))))) (if show-paren-overlay (move-overlay show-paren-overlay from to (current-buffer)) - (setq show-paren-overlay (make-overlay from to)))) + (setq show-paren-overlay (make-overlay from to nil t)))) ;; ;; Always set the overlay face, since it varies. (overlay-put show-paren-overlay 'priority show-paren-priority) -- 2.39.2