# HG changeset patch
# User Vinicius Jose Latorre <viniciusjl@ig.com.br>
# Date 1165006999 0
# Node ID 749bbf34ba64edc73bcd3679dc2830ca21ec1754
# Parent  7d94aedb394acde618fdb81077c57b2f062866b4
Fix the highlight overlay extension

diff -r 7d94aedb394a -r 749bbf34ba64 lisp/ChangeLog
--- a/lisp/ChangeLog	Fri Dec 01 17:43:30 2006 +0000
+++ b/lisp/ChangeLog	Fri Dec 01 21:03:19 2006 +0000
@@ -4,6 +4,10 @@
 
 2006-12-01  Vinicius Jose Latorre  <viniciusjl@ig.com.br>
 
+	* 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 <ben@redfrontdoor.org>.
+
 	* ps-mule.el: Eliminate Emacs 20 compatibility.
 
 	* ps-print.el: Eliminate Emacs 20 & 21 compatibility.
diff -r 7d94aedb394a -r 749bbf34ba64 lisp/paren.el
--- a/lisp/paren.el	Fri Dec 01 17:43:30 2006 +0000
+++ b/lisp/paren.el	Fri Dec 01 21:03:19 2006 +0000
@@ -220,7 +220,7 @@
 			(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 @@
 			  (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)