From: CRDGW2::CRDGW2::MRGATE::"SMTP::CRVAX.SRI.COM::RELAY-INFO-VAX" 21-APR-1989 11:33 To: MRGATE::"ARISIA::EVERHART" Subj: RE: Re: vms mail Message-Id: <8904211455.AA05165@crdgw1.ge.com> Received: From KL.SRI.COM by CRVAX.SRI.COM with TCP; Fri, 21 APR 89 07:27:58 PDT Received: from CUNYVM.CUNY.EDU by KL.SRI.COM with TCP; Fri, 21 Apr 89 07:00:35 PDT Received: from gallua.bitnet by CUNYVM.CUNY.EDU (IBM VM SMTP R1.1) with BSMTP id 8008; Fri, 21 Apr 89 10:00:49 EDT Date: Fri, 21 Apr 89 10:00 EST From: "Kevin Cole at Gallaudet U. Washington DC" Subject: RE: Re: vms mail To: INFO-VAX@KL.SRI.COM X-Vms-To: IN%"INFO-VAX@KL.SRI.COM" Date sent: 21-APR-1989 09:43:50 Zack Sessions writes: >Include the contents of the message you are reading in a reply by >adding the /EXTRACT qualfier, eg, > >MAIL> REPLY/EXT > >Putting some speciasl character at the beginning of each line is a >toughie if your editor is EDT, but I think can be done in a TPU >section file if EVE is your default MAIL editor. Getting the special characters at the beginning of the line using EDT is not as bad as Zack would have you believe. After all, I'm an idiot and I can do it. ;-) (A while back, I posted a much more detailed way to do it including the automatic "Date sent" and signature stuff. If you need that, ask and I'll post again.) The proper magic is as follows: C; ER -L 32000(62ASC -2L) ER EX From line mode, the above string goes into CHANGE (i.e. full-screen mode) and executes the stuff on the line which follows. ER go to [EOB] -L Back up to the beginning of the last line. 32000() Repeat the stuff in the parentheses 32000 times (until error). 62ASC Insert ">" (ASCII 62) -2L Go up to beginning of previous line ER Down to the end of the buffer again EX Switch to line mode again (I switch back to line mode to fetch my signature file...) The trick here is that if you go forward through the file, EDT will add ">" to the end forever. It doesn't stop at [EOB]; it just assumes you want the file to grow. But if you work through it backwards, it eventually tries to back up before the beginning of the buffer and throws up it's hands in frustration. ------------------------------------------------------------------------------- Kevin Cole | Bitnet: CADS_COLE@GALLUA.BITNET Center for Assessment and | or Demographic Studies (CADS) | KJCOLE@GALLUA.BITNET Gallaudet Research Institute (GRI) | Internet: KJCOLE@GALLUX.GALLAUDET.EDU Washington, D.C. 20002 | UUCP: ...!psuvax!gallua.bitnet!kjcole (202) 651-5575 | CompuServe: 76167,1406 ------------------------------------------------------------------------------- "The problem with opinions is that everyone's entitled to their own" - KJC