From 037975a6727fb6e44db2a7ef1b5f82bbd3049102 Mon Sep 17 00:00:00 2001 From: JenChieh Date: Sat, 23 Dec 2023 23:46:25 -0800 Subject: [PATCH] Avoid rest --- vs-comment-return.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/vs-comment-return.el b/vs-comment-return.el index 1b17d1b..1390a64 100644 --- a/vs-comment-return.el +++ b/vs-comment-return.el @@ -149,22 +149,23 @@ (defvar-local vs-comment-return--return-last-p nil "Store weather we hit return twice in a row.") -(defun vs-comment-return--pre-command () +(defun vs-comment-return--pre-command (&rest _) "Execution before command's execution." (add-hook 'post-self-insert-hook #'vs-comment-return--post-self-insert nil t) (add-hook 'post-command-hook #'vs-comment-return--post-command nil t) ;; De-register ourselves! (remove-hook 'pre-command-hook #'vs-comment-return--pre-command t)) -(defun vs-comment-return--post-command () +(defun vs-comment-return--post-command (&rest _) "Execution after command's execution." ;; De-register ourselves! (remove-hook 'post-command-hook #'vs-comment-return--post-command t) ;; Cancel action! (remove-hook 'post-self-insert-hook #'vs-comment-return--post-self-insert t)) -(defun vs-comment-return--post-self-insert () +(defun vs-comment-return--post-self-insert (&rest _) "Execution after self insertion." + (msgu-unsilent (ic-message "????")) (when (and vs-comment-return-cancel-after (eq last-command-event ?\n) (vs-comment-return--line-empty-p))