emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/rainbow-delimiters 1d71bda98c 035/188: Rename syntax-table


From: ELPA Syncer
Subject: [nongnu] elpa/rainbow-delimiters 1d71bda98c 035/188: Rename syntax-table functions to be clearer.
Date: Sat, 1 Jan 2022 00:58:50 -0500 (EST)

branch: elpa/rainbow-delimiters
commit 1d71bda98c43bf650cc337f066b31fea06001576
Author: Jeremy L. Rayman <jeremy.rayman@gmail.com>
Commit: Jeremy L. Rayman <jeremy.rayman@gmail.com>

    Rename syntax-table functions to be clearer.
---
 rainbow-delimiters.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/rainbow-delimiters.el b/rainbow-delimiters.el
index 74ddcea7ab..eebd75b18d 100644
--- a/rainbow-delimiters.el
+++ b/rainbow-delimiters.el
@@ -302,16 +302,16 @@ For example: 'rainbow-delimiters-depth-1-face'."
 
 ;;; Nesting level
 
-(defvar rainbow-delimiters-all-delimiters-syntax-table nil
+(defvar rainbow-delimiters-syntax-table nil
   "Syntax table (inherited from buffer major-mode) which uses all delimiters.
 
 When rainbow-delimiters-minor-mode is first activated, it sets this variable 
and
 the other rainbow-delimiters specific syntax tables based on the current
 major-mode. The syntax table is constructed by the function
-'rainbow-delimiters-make-syntax-table-all-delimiters'.")
+'rainbow-delimiters-make-syntax-table'.")
 
 ;; syntax-table: used with syntax-ppss for determining current depth.
-(defun rainbow-delimiters-make-syntax-table-all-delimiters (syntax-table)
+(defun rainbow-delimiters-make-syntax-table (syntax-table)
   "Inherit SYNTAX-TABLE and add delimiters intended to be highlighted by mode."
   (let ((table (copy-syntax-table syntax-table)))
     (modify-syntax-entry ?\( "()  " table)
@@ -325,7 +325,7 @@ major-mode. The syntax table is constructed by the function
 (defun rainbow-delimiters-depth (loc)
   "Return # of nested levels of parens, brackets, braces LOC is inside of."
   (let ((depth
-         (with-syntax-table rainbow-delimiters-all-delimiters-syntax-table
+         (with-syntax-table rainbow-delimiters-syntax-table
            (car (syntax-ppss loc)))))
     (if (>= depth 0)
         depth
@@ -493,8 +493,8 @@ Used by jit-lock for dynamic highlighting."
         (rainbow-delimiters-unpropertize-region (point-min) (point-max)))
     (jit-lock-register 'rainbow-delimiters-propertize-region t)
     ;; Create necessary syntax tables inheriting from current major-mode.
-    (set (make-local-variable 'rainbow-delimiters-all-delimiters-syntax-table)
-         (rainbow-delimiters-make-syntax-table-all-delimiters 
(syntax-table)))))
+    (set (make-local-variable 'rainbow-delimiters-syntax-table)
+         (rainbow-delimiters-make-syntax-table (syntax-table)))))
 
 ;;;###autoload
 (defun rainbow-delimiters-mode-enable ()



reply via email to

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