Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!seismo!cmcl2!yale!husc6!mit-eddie!PREP.AI.MIT.EDU!rms
From: rms@PREP.AI.MIT.EDU (Richard M. Stallman)
Newsgroups: comp.emacs
Subject: Question
Message-ID: <8612291943.AA25772@EDDIE.MIT.EDU>
Date: Mon, 29-Dec-86 14:44:44 EST
Article-I.D.: EDDIE.8612291943.AA25772
Posted: Mon Dec 29 14:44:44 1986
Date-Received: Mon, 29-Dec-86 21:49:27 EST
Sender: nessus@mit-eddie.MIT.EDU
Lines: 26

It has been suggested that C-o be changed to insert the fill prefix
after the newline that it inserts.  Thus, given

  ** foo bar

with `** ' as the fill prefix, typing C-o would produce

  ** foo 
  ** bar

If you like, or dislike, this idea, I would like to hear why.

You can try it out with

(defun open-line (arg)
  "Insert a newline and leave point before it.
With arg, inserts that many newlines."
  (interactive "*p")
  (let ((flag (and (bolp) (not (bobp)))))
    (if flag (forward-char -1))
    (while (> arg 0)
      (save-excursion
        (insert ?\n)
	(if fill-prefix (insert fill-prefix)))
      (setq arg (1- arg)))
    (if flag (forward-char 1))))