[PATCH] message-elide-region.

[Matthieu Moy <Matthieu.Moy@imag.fr>]

Hi ! 

You  all should  know the  C-c  C-e shortcut  to elide  a region  when
replying. 

it works when the region is a set of full lines, but if I call it with
regions beginning in the middle of a line, everything goes wrong:

Example :

> it works when  the region is a set  of full lines, but if  I call it
> with  regions beginning  in the  middle of  a line,  everything goes
> wrong:

Now, I want to elide `beginning'. I get this.


> it works when  the region is a set  of full lines, but if  I call it
> with  regions 
[...]

 in the  middle of  a line,  everything goes
> wrong:


What I want is this :


> it works when  the region is a set  of full lines, but if  I call it
> with  regions 

[...]

> in the middle of a line, everything goes wrong:


The function to accomplish this is this one:

;;;###autoload
(defun message-elide-region (b e)
  "Elide the text in the region.
An ellipsis (from `message-elide-ellipsis') will be inserted where the
text was killed."
  (interactive "r")
  (kill-region b e)
  (message-newline-and-reformat)
  (delete-region
   (progn (previous-line 1) (point))
   (progn (next-line 3) (point)))
  (insert message-elide-ellipsis))

Anyone to commit this ?

-- 
Matthieu

By  the  way,  I've  just  discovered   M-RET  to  cut  a  line  in  a
citation. It's very usefull.