- 311 名前：名無しさん＠お腹いっぱい。 mailto:sage [2009/04/27(月) 23:05:22 ID: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)))
