andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* paren.el (show-paren-function): Make sure to set 'priority and

Browse source 
'face only if the overlay does exist.
This commit is contained in:
Bastien Guerry 2013-01-24 22:19:02 +01:00
parent e1ffa412b4
commit 3d4147bae3
2 changed files with 9 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-01-24 Aaron Ecay <aaronecay@gmail.com> (tiny change)
* paren.el (show-paren-function): Make sure to set 'priority and
'face only if the overlay does exist.
2013-01-24 Michael Albinus <michael.albinus@gmx.de>
* net/tramp.el (tramp-tramp-file-p): Check, whether NAME is unibyte.

9
lisp/paren.el
View file

@ -259,11 +259,10 @@ matching parenthesis is highlighted in `show-paren-style' after
(- (point) dir)))))
(if show-paren-overlay
(move-overlay show-paren-overlay from to (current-buffer))
(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)
(overlay-put show-paren-overlay 'face face)))
(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)
(overlay-put show-paren-overlay 'face face))))
;; show-paren-mode is nil in this buffer.
(and show-paren-overlay
(delete-overlay show-paren-overlay))