Re: Removing headers from mail..

[Kai Grossjohann <grossjoh@charly.informatik.uni-dortmund.de>]

>>>>> On 05 Mar 1996 21:57:13 +0100, Andy Eskilsson
>>>>> <mpt95aes@pt.hk-r.se> said:

  Andy> The second problem is that I could do a hook that deletes one
  Andy> line, but the Received lines often span a couple of lines, is
  Andy> there any small function that can take care of this?

This should kinda give you the idea:

(defun kill-long-line ()
  ; kill a region between (A) and (B)
  (kill-region
    ; (A) is the spot where the cursor currently is
    (point)
    ; don't move point while determining (B)
    (save-excursion
      ; (B) is at least at the beginning of the next line
      ; (note that forward-line moves to beginning of next line)
      (forward-line 1)
      ; if we're looking at a continuation line (which begins with
      ; whitespace followed by non-whitespace), ...
      (while (looking-at "^[ \t]+[^ \t]+")
        ; move another line
        (forward-line 1))
      ; (B) is where we have moved now
      (point))))

I don't know if you want to restrict the whole thing to the header
section only, or something.

The code is untested!!

        kai
--
~/.signature