separedit.el: 在单独的缓冲区编辑注释、docstring 或其中的代码块

这样应该可以:

(defun separedit-fill ()
  (interactive)
  (let ((separedit-continue-fill-column t))
    (with-current-buffer (separedit)
      (fill-region (point-min) (point-max))
      (execute-kbd-macro (kbd "C-c C-k")))))

UPDATE:

-     (execute-kbd-macro (kbd "C-c C-c")))))
+     (execute-kbd-macro (kbd "C-c C-k")))))
1 个赞