4444(defconst auto-rename-tag--tag-regexp " <[^>]*"
4545 " Tag regular expression to find tag position." )
4646
47- (defvar-local auto-rename-tag--pre-command-actived nil
47+ (defvar-local auto-rename-tag--pre-command-activated nil
4848 " Check if `pre-command-hook' called." )
4949
5050(defvar-local auto-rename-tag--record-prev-word " "
@@ -345,14 +345,14 @@ DIRECT can be either only 'backward and 'forward."
345345(defun auto-rename-tag--before-action ()
346346 " Before rename core action."
347347 (setq auto-rename-tag--record-prev-word " " ) ; Reset record.
348- (setq auto-rename-tag--pre-command-actived nil ) ; Reset flag.
348+ (setq auto-rename-tag--pre-command-activated nil ) ; Reset flag.
349349
350350 (when (and (not undo-in-progress)
351351 (auto-rename-tag--inside-tag-p)
352352 (not (auto-rename-tag--self-tag-p)))
353353 (save-excursion
354354 ; ; Set active flag.
355- (setq auto-rename-tag--pre-command-actived t )
355+ (setq auto-rename-tag--pre-command-activated t )
356356
357357 (setq auto-rename-tag--record-prev-word (auto-rename-tag--get-tag-name-at-point))
358358
@@ -365,7 +365,7 @@ DIRECT can be either only 'backward and 'forward."
365365
366366(defun auto-rename-tag--after-action ()
367367 " After rename core action."
368- (when auto-rename-tag--pre-command-actived
368+ (when auto-rename-tag--pre-command-activated
369369 (save-excursion
370370 (let ((is-end-tag nil )
371371 (current-word " " ) (pair-tag-word " " ))
0 commit comments