[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: copy-word-from-line-above
From: |
rgb |
Subject: |
Re: copy-word-from-line-above |
Date: |
21 Jan 2007 08:15:44 -0800 |
User-agent: |
G2/1.0 |
Greg Bognar wrote:
> > I use this because its a bit more flexable. It allows you to copy exactly
> > the parts you want even if not full words.
> >
> > (global-set-key [?\C-\M-z] 'insert-prior-line-char)
> >
> > (defun insert-prior-line-char ()
> > "Insert the same character as in the prior line. Space if none."
> > (interactive)
> > (let* ((cur (current-column))
> > (char (save-excursion
> > (if (or (not (eq 0 (forward-line -1)))
> > (not (eq cur (move-to-column cur)) ))
> > 32
> > (char-after)))))
> > (insert char)))
>
> This is great, but wouldn't it be nicer if you could give it an argument?
> Then you could do, say, C-8 C-M-z and the next 8 characters would be
> inserted.
I've got my keyboard repeat rate high enough that I've not missed
that feature but it's a good idea. Maybe I'll add that Monday when
I have time to goof of at work:-)
thanks
- copy-word-from-line-above, HS, 2007/01/18
- Re: copy-word-from-line-above, Marc Tfardy, 2007/01/18
- Re: copy-word-from-line-above, rgb, 2007/01/19
- Re: copy-word-from-line-above, Greg Bognar, 2007/01/21
- Re: copy-word-from-line-above,
rgb <=
- Re: copy-word-from-line-above, HS, 2007/01/22
- Re: copy-word-from-line-above, rgb, 2007/01/24
- Re: copy-word-from-line-above, HS, 2007/01/24
- Re: copy-word-from-line-above, Markus Triska, 2007/01/24
- Re: copy-word-from-line-above, HS, 2007/01/25
- Re: copy-word-from-line-above, Markus Triska, 2007/01/25
- Re: copy-word-from-line-above, rgb, 2007/01/25