Re: keybinding to duplicate the current line.

[Helmut Eller]

* alin.s [2010-01-17 14:40+0100] writes:

> Do you consider that such a function would be useful for many of you?

A standard keybinding would be useful for me.  I use C-x , because that
key wasn't taken yet.

Helmut

(defun copy-line ()
  "Copy the current line."
  (interactive)
  (let ((col (current-column))
        (beg (progn (beginning-of-line) (point)))
        (end (progn (end-of-line) (point))))
    (forward-line)
    (save-excursion (insert (buffer-substring beg end) "\n"))
    (move-to-column col)))

(global-set-key "\C-x," 'copy-line)