Re: Shift selection using interactive spec

[David Kastrup <dak@gnu.org>]

M Jared Finder <jared@hpalace.com> writes:

> As an honest-to-god USER of Emacs, I want to say I completely agree
> with Kim, here.  Since I discovered cua-mode, I've had the following
> code in my .emacs:
>
>> (let ((move-fns '(c-forward-conditional c-backward-conditional
>>                   c-down-conditional c-up-conditional
>>                   c-down-conditional-with-else
>>                   c-up-conditional-with-else
>>                   c-beginning-of-statement c-end-of-statement)))
>>   (require 'cua-base)
>>   (dolist (symbol move-fns)
>>     (unless (eq 'move (get symbol 'CUA))
>>       (display-warning 'emacs (format "Adding CUA property to `%s'." symbol))
>>       (setf (get symbol 'CUA) 'move))))
>
> All I have to do to make an existing command support shift-select is
> add its name to the list.  (The move-fns list used to be a lot longer
> when I was using Emacs 21.)

Changing a command's behavior after the thought can be dealt with by
using advice.

Attaching properties is a can of worms that does not work for anonymous
functions.

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum