branch: elpa/rainbow-delimiters
commit 1d71bda98c43bf650cc337f066b31fea06001576
Author: Jeremy L. Rayman <[email protected]>
Commit: Jeremy L. Rayman <[email protected]>
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 ()
