Skip to content

Commit 5df58a7

Browse files
committed
Fix paste forward issue.
1 parent a59764c commit 5df58a7

File tree

1 file changed

+3
-9
lines changed

1 file changed

+3
-9
lines changed

auto-rename-tag.el

Lines changed: 3 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -259,6 +259,7 @@ DNC : duplicate nested count."
259259
;; self tag. This logic error doesn't necessary has to be resolved!
260260
(let ((start-tag-pt (auto-rename-tag--start-tag-point))
261261
(nested-start-tag-pt nil))
262+
(goto-char start-tag-pt)
262263
(re-search-forward "[^=][ \t\n]*>" nil t)
263264
(forward-char -1)
264265
(setq nested-start-tag-pt (auto-rename-tag--start-tag-point))
@@ -420,22 +421,15 @@ DIRECT can be either only 'backward and 'forward."
420421
"Do stuff after buffer is changed."
421422
(auto-rename-tag--after-action))
422423

423-
(defun auto-rename-tag--post-command ()
424-
"Do stuff after buffer is changed.
425-
NOTE: Having this function is for `lsp` display issue with flycheck."
426-
(auto-rename-tag--after-action))
427-
428424
(defun auto-rename-tag--enable ()
429425
"Enable `auto-rename-tag' in current buffer."
430426
(add-hook 'before-change-functions #'auto-rename-tag--before-change nil t)
431-
(add-hook 'after-change-functions #'auto-rename-tag--after-change nil t)
432-
(add-hook 'post-command-hook #'auto-rename-tag--post-command nil t))
427+
(add-hook 'after-change-functions #'auto-rename-tag--after-change nil t))
433428

434429
(defun auto-rename-tag--disable ()
435430
"Disable `auto-rename-tag' in current buffer."
436431
(remove-hook 'before-change-functions #'auto-rename-tag--before-change t)
437-
(remove-hook 'after-change-functions #'auto-rename-tag--after-change t)
438-
(remove-hook 'post-command-hook #'auto-rename-tag--post-command t))
432+
(remove-hook 'after-change-functions #'auto-rename-tag--after-change t))
439433

440434
;;;###autoload
441435
(define-minor-mode auto-rename-tag-mode

0 commit comments

Comments
 (0)