Re: delete-region - is their a way to get the deleted text?

[Thorsten Jolitz]

David Engster <deng@randomsample.de> writes:

> Thorsten Jolitz writes:
>> I found a function that would be useful for me as is - if only I would
>> have access to the region deleted with 'delete-region' inside that
>> function.
>>
>> ,------------------------------------------------------------------
>> | (delete-region START END)
>> | Delete the text between START and END.
>> | This command deletes buffer text without modifying the kill ring.
>> `------------------------------------------------------------------
>>
>> If its not in the kill ring - is there any other way to get the text
>> that deleted, or is it simply gone and lost?
>
> Well, there's always the super-hacky way:
>
> (require 'cl)
>
> (defadvice your-function-of-interest
>   (around replace-delete-with-kill activate)
>   "Replace `delete-region' with `kill-region'."
>   (flet ((delete-region (x y)
>                       (kill-region x y)))
>     ad-do-it))
>
> And then just yank...

Not that I understand all of it, but it seems to do exactly what I want.
Thanks!

-- 
cheers,
Thorsten