* message-kill-to-signature eats delimiter
@ 1998-01-24 1:20 Richard Hoskins
0 siblings, 0 replies; only message in thread
From: Richard Hoskins @ 1998-01-24 1:20 UTC (permalink / raw)
message-kill-to-signature eats the "-- ".
I expected it to kill the region between point and the delimiter, and
leave the mark on the line after the quoted text.
My patch:
*** qgnus/lisp/message.el~ Tue Jan 6 01:48:40 1998
--- qgnus/lisp/message.el Fri Jan 23 19:56:27 1998
***************
*** 1448,1454 ****
(interactive)
(let ((point (point)))
(message-goto-signature)
! (kill-region point (point))))
(defun message-newline-and-reformat ()
"Insert four newlines, and then reformat if inside quoted text."
--- 1448,1457 ----
(interactive)
(let ((point (point)))
(message-goto-signature)
! (forward-line -2)
! (kill-region point (point))
! (unless (bolp)
! (insert "\n"))))
(defun message-newline-and-reformat ()
"Insert four newlines, and then reformat if inside quoted text."
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~1998-01-24 1:20 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-01-24 1:20 message-kill-to-signature eats delimiter Richard Hoskins
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).