Re: Copying a whole line using kill-ring-save in emacs 24.3.1

[Alan <bowl.of.petunias@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 2863 bytes --]

Thanks so much for your help. Your code works. I just have a couple follow
up questions:

1. Although your code does copy the line, the behavior is a little
different from what I had in emacs version 24.2.1. In 24.2.1, when I hit
"M-w", the cursor would bounce to the beginning of the line, then back to
its original position while copying. It's just a visual thing, but I like
it because it tells me the line was definitely copied. Is there some way to
mimic that behavior?

2. This is less relevant, but in the original wiki page from which I copied
the code, http://www.emacswiki.org/emacs/WholeLineOrRegion, there lists
another function that kills the current line:

(put 'kill-region 'interactive-form
     '(interactive
       (if (use-region-p)
           (list (region-beginning) (region-end))
         (list (line-beginning-position) (line-beginning-position 2)))))


This code works for me in the newest emacs version of 24.3.1. How come this
code works and not the "copy whole line" code in my original message?

Thanks.


On Mon, Mar 18, 2013 at 11:30 AM, Le Wang <l26wang@gmail.com> wrote:

> On Sun, Mar 17, 2013 at 4:01 PM, Alan <bowl.of.petunias@gmail.com> wrote:
> > Hi,
> >
> > I've used the following code, from
> > http://www.emacswiki.org/emacs/WholeLineOrRegion, to copy a whole line:
> >
> > (put 'kill-ring-save 'interactive-form
> >      '(interactive
> >        (if (use-region-p)
> >            (list (region-beginning) (region-end))
> >          (list (line-beginning-position) (line-beginning-position 2)))))
> >
> >
> > Basically, it allows the use of "meta-w" to copy the entire line where
> the
> > cursor is currently located, as long as no text is visually selected.
> > (Transient Mark Mode must be enabled for this to work.) However, after
> > upgrading to emacs version 24.3.1 (from 24.2.1), this fails to work.
> >
> > When I visit a file for the first time and hit "meta-w", I get the error:
> > “Wrong type argument: integer-or-marker-p, nil”, although it does
> > successfully copy the line. However, further “meta-w” presses copy from
> the
> > current position to the last mark, regardless of whether the region is
> > highlighted.
> >
> > Any thoughts on getting the “Meta-w” to work? Thanks.
>
> It looks like functionality has been added to highlight the region that was
> copied.  The problem is your snippet relies on the implementation instead
> of
> the API.  It's better to define your own command and remap.
>
> (defun my-kill-ring-save (beg end)
>   (interactive (if (use-region-p)
>                    (list (region-beginning) (region-end))
>                  (list (line-beginning-position) (line-beginning-position
> 2))))
>   (kill-ring-save beg end))
> (global-set-key [remap kill-ring-save] 'my-kill-ring-save)
>
>
>
> --
> Le
>

[-- Attachment #2: Type: text/html, Size: 3769 bytes --]