09/04/27 23:05:22 MQewD7Cg0
>>309
適当に作ってみた
(defun newline-and-indent-simply ()
(interactive "*")
(let ((space ""))
(save-excursion
(goto-bol)
(and (skip-chars-forward "[ \t]*")
(setq space (buffer-substring (save-excursion (goto-bol) (point))
(point)))))
(newline)
(insert space)))