(defun comment-this-level ()
(interactive)
(move-beginning-of-line 1)
(set-mark-command nil)
(forward-sexp nil)
(comment-dwim nil))
(global-set-key (kbd "C-;") 'comment-this-level)
;;I feels good!
(defun comment-this-level ()
(interactive)
(move-beginning-of-line 1)
(set-mark-command nil)
(forward-sexp nil)
(comment-dwim nil))
(global-set-key (kbd "C-;") 'comment-this-level)
;;I feels good!
转载于:https://www.cnblogs.com/bombless/p/my-first-emacs-custom-key-binding.html