# HG changeset patch # User Richard M. Stallman # Date 824066708 0 # Node ID 77a1345ec9ca5c0febee029ecab69eb7e4535969 # Parent 73e281e7b1aa547d9e8dca4d3e0594d860cb1169 (show-paren-command-hook): Position show-paren-overlay-1 properly when first creating it (just like when moving it). diff -r 73e281e7b1aa -r 77a1345ec9ca lisp/paren.el --- a/lisp/paren.el Sun Feb 11 18:46:18 1996 +0000 +++ b/lisp/paren.el Sun Feb 11 19:25:08 1996 +0000 @@ -107,7 +107,7 @@ (+ (point) dir) (point) (current-buffer)) (setq show-paren-overlay-1 - (make-overlay (- pos dir) pos))) + (make-overlay (+ (point) dir) (point)))) ;; Always set the overlay face, since it varies. (overlay-put show-paren-overlay-1 'face face)) ;; Otherwise, turn off any such highlighting.