; * lisp/paren.el (show-paren-function): Fix last change (bug#64547).
This commit is contained in:
parent
ea696ea4b9
commit
c5fb730159
1 changed files with 2 additions and 3 deletions
|
@ -515,10 +515,9 @@ It is the default value of `show-paren-data-function'."
|
||||||
;; ...or partially visible, and the
|
;; ...or partially visible, and the
|
||||||
;; invisible part is less than 1/4th
|
;; invisible part is less than 1/4th
|
||||||
;; of the default font height
|
;; of the default font height
|
||||||
(or (< (length part) 4)
|
(and (>= (length part) 4)
|
||||||
(and
|
|
||||||
(< (nth 2 part) dfh4)
|
(< (nth 2 part) dfh4)
|
||||||
(< (nth 3 part) dfh4)))))))
|
(< (nth 3 part) dfh4))))))
|
||||||
(let ((context (blink-paren-open-paren-line-string
|
(let ((context (blink-paren-open-paren-line-string
|
||||||
openparen))
|
openparen))
|
||||||
(message-log-max nil))
|
(message-log-max nil))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue