branch: externals/tex-parens
commit 20471db76e63e003c13ec3c1b152328faefbb19e
Author: Paul Nelson <[email protected]>
Commit: Paul Nelson <[email protected]>

    add begin/end of defun functions
---
 tex-parens.el | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/tex-parens.el b/tex-parens.el
index 249cb0ca30..d183ff1c8f 100644
--- a/tex-parens.el
+++ b/tex-parens.el
@@ -33,7 +33,17 @@
    preview-auto-reveal
    '(eval (preview-arrived-via (key-binding [left])
                                (key-binding [right])
-                               #'backward-char #'forward-char 
#'tex-parens-down))))
+                               #'backward-char #'forward-char 
#'tex-parens-down)))
+  (setq-local beginning-of-defun-function #'tex-parens-beginning-of-defun)
+  (setq-local end-of-defun-function #'tex-parens-end-of-defun))
+
+(defun tex-parens-beginning-of-defun ()
+  (interactive)
+  (re-search-backward "^\\\\begin{[^}]+}" nil t))
+
+(defun tex-parens-end-of-defun ()
+  (interactive)
+  (re-search-forward "^\\\\end{[^}]+}\n" nil t))
 
 (defvar tex-parens-pairs
   '(("(" . ")")

Reply via email to