Skip to content

Commit a59764c

Browse files
committed
Fixed typo.
1 parent 754a505 commit a59764c

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

auto-rename-tag.el

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -44,7 +44,7 @@
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

Comments
 (0)