Re: Adding String to Beginning of Lines

[Michael Heerdegen <michael_heerdegen@web.de>]

Christopher Dimech <dimech@gmx.com> writes:

> Correct,  the replacement.  Because in .el files, the replacement will be
> ";; + ", in other languages, it is dependent on the symbol for comments
> (e.g. "!! +" for fortran code .f)

Ok.

If you prefer to have `interactive' return the default, then: a
not-stringish sexp as interactive spec is evaluated normally, and
expected to return the list of arguments.  So you could use something
like:

(defun rec-cont (beg end s)
  (interactive (list (region-beginning)
                     (region-end)
                     (read-string "Prefix: " nil nil "your-default")))
  (replace-regexp "^" s nil beg end))

You can also use an expression to provide a default depending on the
current mode, e.g.

  (if comment-start (concat comment-start " +") ";; +")

instead of a constant string "your-default".


Michael.