emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-25 6de8429: * lisp/paren.el (show-paren--default, sh


From: Noam Postavsky
Subject: [Emacs-diffs] emacs-25 6de8429: * lisp/paren.el (show-paren--default, show-paren-function): Add docstring.
Date: Tue, 14 Mar 2017 00:06:36 -0400 (EDT)

branch: emacs-25
commit 6de8429c2989d0fccab0a485c7f28e522e07fa92
Author: Hong Xu <address@hidden>
Commit: Noam Postavsky <address@hidden>

    * lisp/paren.el (show-paren--default, show-paren-function): Add docstring.
---
 lisp/paren.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lisp/paren.el b/lisp/paren.el
index 4a83fa1..562831d 100644
--- a/lisp/paren.el
+++ b/lisp/paren.el
@@ -181,6 +181,9 @@ if there's no opener/closer near point, or a list of the 
form
 Where HERE-BEG..HERE-END is expected to be near point.")
 
 (defun show-paren--default ()
+  "Finds the opener/closer near point and its match.
+
+It is the default value of `show-paren-data-function'."
   (let* ((temp (show-paren--locate-near-paren))
         (dir (car temp))
         (outside (cdr temp))
@@ -233,9 +236,8 @@ Where HERE-BEG..HERE-END is expected to be near point.")
                  (if (= dir 1) pos (1+ pos))
                  mismatch)))))))
 
-;; Find the place to show, if there is one,
-;; and show it until input arrives.
 (defun show-paren-function ()
+  "Highlight the parentheses until the next input arrives."
   (let ((data (and show-paren-mode (funcall show-paren-data-function))))
     (if (not data)
         (progn



reply via email to

[Prev in Thread] Current Thread [Next in Thread]