Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 18732;andrew.cmu.edu;Soshi Iba Received: from
aldebaran.weh.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/cgf5nWu00VoiQzTk4y>;  
        Fri,  1 Oct 1993 12:37:55 -0400 (EDT) Received: from
aldebaran.weh.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/usr6/si0l/.Outgoing/QF.Egf5iba00VoiAzT15M>;        
  Fri,  1 Oct 1993 12:32:41 -0400 (EDT) Received: from
BatMail.robin.v2.13.CUILIB.3.45.SNAP.NOT.LINKED.aldebaran.weh.andrew.cmu.
edu.pmax.ul4           via MS.5.6.aldebaran.weh.andrew.cmu.edu.pmax_ul4;
          Fri,  1 Oct 1993 12:32:39 -0400 (EDT) Message-ID:
<ggf5ibS00Voi8zT0xs@andrew.cmu.edu> Date: Fri,  1 Oct 1993 12:32:39
-0400 (EDT) From: Soshi Iba <iba+@CMU.EDU> To: Info-Andrew
<info-andrew+@andrew.cmu.edu> Subject: console
I've made and tested out the console that was designed, and I would like
you to put it in general library.  Where should I consult?
================================================================
$@<M>l(J $@Am;J(J Soshi Iba Carnegie Mellon University Electrical &
Computer Engineering Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/Ygga=Gi00UdZAcOUgH>;  
        Wed,  6 Oct 1993 02:16:51 -0400 (EDT) Received: from
po3.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q001/QF.sgga7pO00Udb92iE4d>;        
  Wed,  6 Oct 1993 02:13:11 -0400 (EDT) Received: from alpha.xerox.com
(alpha.Xerox.COM [13.1.64.93]) by po3.andrew.cmu.edu (8.5/8.5) with SMTP
id CAA17070; Wed, 6 Oct 1993 02:12:55 -0400 Received: from
holmes.parc.xerox.com ([13.1.100.162]) by alpha.xerox.com with SMTP id
<11827>; Tue, 5 Oct 1993 23:12:24 PDT Received: by holmes.parc.xerox.com
id <16134>; Tue, 5 Oct 1993 23:12:17 -0700 Received: from
Messages.7.15.N.CUILIB.3.45.SNAP.NOT.LINKED.holmes.parc.xerox.com.sun4.41
           via MS.5.6.holmes.parc.xerox.com.sun4_41;           Tue,  5
Oct 1993 23:12:11 -0700 (PDT) Message-ID:
<8gga6v0B0KGWM2LHMq@holmes.parc.xerox.com> Date: 	Tue, 5 Oct 1993
23:12:11 PDT Sender: Bill Janssen <janssen@parc.xerox.com> From: Bill
Janssen <janssen@parc.xerox.com> To: info-andrew@andrew.cmu.edu Subject:
how to pipe mail message through a UNIX program using FLAMES?
I can't believe I can't do this, but I can't figure out how to use
flames to write a whole message (including headers) through a pipe to
the stdin of a UNIX process.  In fact, I can't even figure out how to
write the message to a temp file, and then  use system() to run the
command.
Anyone know this trick?
Bill Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
po2.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/4gggEXK00UdaIBXU4X>;  
        Wed,  6 Oct 1993 09:12:03 -0400 (EDT) Received: from
po4.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q003/QF.ggggE0C00Ui387kk4Z>;        
  Wed,  6 Oct 1993 09:11:32 -0400 (EDT) If-Type-Unsupported: send
Received: from po3.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q002/QF.Eggg9Sm00Udb0BeU5m>;        
  Wed,  6 Oct 1993 09:04:30 -0400 (EDT) Received: from
thumper.bellcore.com (thumper.bellcore.com [128.96.41.1]) by
po3.andrew.cmu.edu (8.5/8.5) with SMTP id JAA03489; Wed, 6 Oct 1993
09:04:26 -0400 Received: from guppylake.bellcore.com by
thumper.bellcore.com (4.1/4.7)  	id <AA10249> for
info-andrew@andrew.cmu.edu; Wed, 6 Oct 93 09:04:19 EDT Received: by
guppylake.bellcore.com (4.1/4.7)  	id <AA28089> for
janssen@parc.xerox.com; Wed, 6 Oct 93 09:05:04 EDT Received: from
Messages.8.5.N.CUILIB.3.45.SNAP.NOT.LINKED.guppylake.bellcore.com.sun4.41
           via MS.5.6.guppylake.bellcore.com.sun4_41;           Wed,  6
Oct 1993 09:05:03 -0400 (EDT) Message-Id:
<sggg9z_0M2UD817MBh@thumper.bellcore.com> Date: Wed,  6 Oct 1993
09:05:03 -0400 (EDT) From: Nathaniel Borenstein
<nsb@thumper.bellcore.com> Mime-Version: 1.0 Content-Type: text/plain;
charset=US-ASCII To: info-andrew@andrew.cmu.edu, Bill Janssen
<janssen@parc.xerox.com> Subject: Re: how to pipe mail message through a
UNIX program using FLAMES? In-Reply-To: Message from "Bill Janssen
<janssen@parc.xerox.com>" dated "Tue, 5 Oct 1993 23:12:11 PDT"
The relevant commands are "filter" and "system".   It's been years since
I've used them, but here's a code fragment I wrote years ago that still
works:
(defun post-netnews-mail (msg newsgroups)   (progn    (filter     0    
(strcat      "From: "      (addhost (car (getheadercontents msg
"from")))      NEWLINE "Subject: "      (nulltoempty (car
(getheadercontents msg "subject")))      NEWLINE "Newsgroups: "     
newsgroups      NEWLINE NEWLINE      (getpartialbody msg 0 (bodylength
msg)))     "csh" "-c" "cat > /tmp/nnpost")    (cond     ((equal 0
(system "/usr/local/bin/inews -h < /tmp/nnpost > /tmp/nnpost.out"))     
(finalappendmsgtodir msg (findfolder "bb.daemons.outnews" "w")))     (T
(rejectmessage         msg         (ReplyAddr msg "s")        
"BBoard.Maintainer <andrew>"         (strcat	"The following message was
rejected for netnews posting by inews:"                 NEWLINE         
       NEWLINE                 (car (cdr (filter 0 NIL	"cat"
"/tmp/nnpost.out")))))))))
Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
po5.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/ogghIWm00UddEQfkhN>;  
        Wed,  6 Oct 1993 10:24:35 -0400 (EDT) Received: from
po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q002/QF.0gghESq00UddEQNU4L>;        
  Wed,  6 Oct 1993 10:20:14 -0400 (EDT) Received: from MIT.EDU
(ATHENA-AS-WELL.MIT.EDU [18.72.1.1]) by po5.andrew.cmu.edu (8.5/8.5)
with SMTP id KAA07264; Wed, 6 Oct 1993 10:20:11 -0400 Received: from
OGLALA.MIT.EDU by MIT.EDU with SMTP  	id AA17935; Wed, 6 Oct 93 10:19:52
EDT Received: by oglala.MIT.EDU (5.57/4.7) id AA15501; Wed, 6 Oct 93
10:19:44 -0400 Received: from
VUI.Andrew.3.70.CUILIB.3.45.SNAP.NOT.LINKED.oglala.pmax.ul4          
via MS.5.6.oglala.pmax_ul4;           Wed,  6 Oct 1993 10:19:43 -0400
(EDT) Message-Id: <8gghDzkGgE47MwV7B4@athena.mit.edu> Date: Wed,  6 Oct
1993 10:19:43 -0400 (EDT) From: Bill Cattey <wdc@MIT.EDU> To:
Info-Andrew <info-andrew+@andrew.cmu.edu>,         Chip Christian
<chip@allegra.att.com>,         "Robert Kemmetmueller"
<rskm@rchland.VNET.IBM.COM> Subject: Re: fonts in andrew 5.1 Cc:
In-Reply-To: <QgelRyA91JbQMyCBkM@rchland.ibm.com> References:
<ogeBYZH02mBqMMyVx2@fugue.tempo.att.com.> 
<kgeSVxy00gpnI0zI9k@cs.cmu.edu>  <QgelRyA91JbQMyCBkM@rchland.ibm.com>
Don't forget the various expedients available by embedding troff in your
document.  The ez-troff help page gives many useful cook book solutions.
 Remember to enclose troff directives either in the format note style,
or in a troff inset.  (See contrib/mit/annot/stroffet.*)
-wdc

Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
po2.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/wgghSdy00UdaQHi0gQ>;  
        Wed,  6 Oct 1993 10:35:22 -0400 (EDT) Received: from
po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q003/QF.ggghOc600UddISG04F>;        
  Wed,  6 Oct 1993 10:31:04 -0400 (EDT) Received: from MIT.EDU
(ATHENA-AS-WELL.MIT.EDU [18.72.1.1]) by po5.andrew.cmu.edu (8.5/8.5)
with SMTP id KAA07740; Wed, 6 Oct 1993 10:30:57 -0400 Received: from
OGLALA.MIT.EDU by MIT.EDU with SMTP  	id AA18771; Wed, 6 Oct 93 10:30:45
EDT Received: by oglala.MIT.EDU (5.57/4.7) id AA15510; Wed, 6 Oct 93
10:30:44 -0400 Received: from
VUI.Andrew.3.70.CUILIB.3.45.SNAP.NOT.LINKED.oglala.pmax.ul4          
via MS.5.6.oglala.pmax_ul4;           Wed,  6 Oct 1993 10:30:43 -0400
(EDT) Message-Id: <cgghOHsGgE47IwV8QE@athena.mit.edu> Date: Wed,  6 Oct
1993 10:30:43 -0400 (EDT) From: Bill Cattey <wdc@MIT.EDU> To: Bill
Schell <bill@allegra.att.COM>, Wilfred.Hansen@cs.cmu.edu Subject: Re:
fonts in andrew 5.1 Cc: Info-Andrew <info-andrew+@ANDREW.CMU.EDU>
In-Reply-To: <ggen8GC00gpnMALYoi@cs.cmu.edu> References:
<ogeBYZH02mBqMMyVx2@fugue.tempo.att.com.> 
<kgeSVxy00gpnI0zI9k@cs.cmu.edu> 
<0gelnDj02mCPA5o2Id@gargoyle.tempo.att.com.> 
<ggen8GC00gpnMALYoi@cs.cmu.edu>
Remember, that the downside to using the Andrew fonts is that they never
added the foreign characters (They're 7 bit instead of 8 bit fonts.)
Properly speaking, the interline spacing problem does not lie with the
fonts.  The X11 fonts do what is typographically correct. The drawtextv
object decides to set interline spacing NOT by the font's specified
interline spacing metric, but by the bounding box.
I believe this was done to simplify the redrawing algorithm. By using
the bounding box instead of the interline spacing metric you avoid
having to worry about those cases when descenders dirty up the text line
below, or when very tall characters dirty up the line above.
My guess is that the Andy fonts were hand-tooled to kludge the right behavior.
-wdc

Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
po4.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/oggjDNK00Ui3QEKU9t>;  
        Wed,  6 Oct 1993 12:35:37 -0400 (EDT) Received: from
po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q002/QF.cggjAy200UddQrZ059>;        
  Wed,  6 Oct 1993 12:33:02 -0400 (EDT) Received: from
barney.cs.city.ac.uk (barney.cs.city.ac.uk [138.40.91.8]) by
po5.andrew.cmu.edu (8.5/8.5) with SMTP id MAA14217; Wed, 6 Oct 1993
12:32:56 -0400 Received: from wilma.cs.city.ac.uk by
barney.cs.city.ac.uk; Wed, 6 Oct 1993 17:35:06 +0100 Received: from
Messages.8.5.N.CUILIB.3.45.SNAP.NOT.LINKED.wilma.cs.city.ac.uk.sun4.41  
        via MS.5.6.wilma.cs.city.ac.uk.sun4_41;           Wed,  6 Oct
1993 17:30:44 +0100 (BST) Message-Id: <cggj_oy__5g94M1VBv@cs.city.ac.uk>
Date: Wed,  6 Oct 1993 17:30:44 +0100 (BST) From: Nick Williams
<njw@cs.city.ac.uk> X-Andrew-Message-Size: 1427+0 Content-Type: X-BE2;
12 If-Type-Unsupported: send To: info-andrew@andrew.cmu.edu Subject:
HTML Text widget availability Cc: Nick Williams <njw@cs.city.ac.uk>
 Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/gggr3vO00UdZ5mm0gK>;  
        Wed,  6 Oct 1993 21:29:31 -0400 (EDT) Received: from
po3.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q000/QF.sggr1ou00UdbMhVE5Q>;        
  Wed,  6 Oct 1993 21:27:17 -0400 (EDT) Received: from alpha.xerox.com
(alpha.Xerox.COM [13.1.64.93]) by po3.andrew.cmu.edu (8.5/8.5) with SMTP
id VAA11646; Wed, 6 Oct 1993 21:27:11 -0400 Received: from
holmes.parc.xerox.com ([13.1.100.162]) by alpha.xerox.com with SMTP id
<12312>; Wed, 6 Oct 1993 18:27:05 PDT Received: by holmes.parc.xerox.com
id <16134>; Wed, 6 Oct 1993 18:26:53 -0700 Received: from
Messages.7.15.N.CUILIB.3.45.SNAP.NOT.LINKED.holmes.parc.xerox.com.sun4.41
           via MS.5.6.holmes.parc.xerox.com.sun4_41;           Wed,  6
Oct 1993 18:26:46 -0700 (PDT) Message-ID:
<Qggr1KIB0KGWI2LQQB@holmes.parc.xerox.com> Date: 	Wed, 6 Oct 1993
18:26:46 PDT Sender: Bill Janssen <janssen@parc.xerox.com> From: Bill
Janssen <janssen@parc.xerox.com> To: Nathaniel Borenstein
<nsb@thumper.bellcore.com> Subject: Re: how to pipe mail message through
a UNIX program using FLAMES? CC: info-andrew@andrew.cmu.edu In-Reply-To:
<sggg9z_0M2UD817MBh@thumper.bellcore.com> References:
<sggg9z_0M2UD817MBh@thumper.bellcore.com>
Excerpts from direct: 6-Oct-93 Re: how to pipe mail messag.. Nathaniel
Borenstein@thu (997*)
> The relevant commands are "filter" and "system".   It's been years
since > I've used them, but here's a code fragment I wrote years ago
that still > works:
Thanks again, Nathaniel, but that doesn't do what I need.  What your
example does is to write a version of the message, which includes two of
the original headers, and the new header "Newsgroups" to a file, and
then you write the body of the message to a file.  I'd like to write the
entire original text of the message, including all headers, to a file
(preferably in one fell swoop).
Bill Return-path: <atkbb+Bad-Addresses@andrew.cmu.edu>
X-Andrew-Authenticated-as: 0;andrew.cmu.edu;Network-Mail Received: from
po2.andrew.cmu.edu via trymail for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/8ggrIL:00Uda1IX05G>;  
        Wed,  6 Oct 1993 21:47:05 -0400 (EDT) Received: from
po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q000/QF.8ggrHYW00Udd8k4k4I>;        
  Wed,  6 Oct 1993 21:46:13 -0400 (EDT) If-Type-Unsupported: send
Received: from po3.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q001/QF.wggrEtu00UdbAj5E57>;        
  Wed,  6 Oct 1993 21:43:27 -0400 (EDT) Received: from
thumper.bellcore.com (thumper.bellcore.com [128.96.41.1]) by
po3.andrew.cmu.edu (8.5/8.5) with SMTP id VAA12048; Wed, 6 Oct 1993
21:43:13 -0400 Received: from guppylake.bellcore.com by
thumper.bellcore.com (4.1/4.7)  	id <AA29469> for
info-andrew@andrew.cmu.edu; Wed, 6 Oct 93 21:42:37 EDT Received: by
guppylake.bellcore.com (4.1/4.7)  	id <AA03541> for
bobg@z-code.z-code.com; Wed, 6 Oct 93 21:43:22 EDT Received: from
Messages.8.5.N.CUILIB.3.45.SNAP.NOT.LINKED.guppylake.bellcore.com.sun4.41
           via MS.5.6.guppylake.bellcore.com.sun4_41;           Wed,  6
Oct 1993 21:43:21 -0400 (EDT) Message-Id:
<oggrEtS0M2UDRQsKxW@thumper.bellcore.com> Date: Wed,  6 Oct 1993
21:43:21 -0400 (EDT) From: Nathaniel Borenstein
<nsb@thumper.bellcore.com> Mime-Version: 1.0 Content-Type: text/plain;
charset=US-ASCII To: Bill Janssen <janssen@parc.xerox.com> Subject: Re:
how to pipe mail message through a UNIX program using FLAMES? Cc:
info-andrew@andrew.cmu.edu, Bob Glickstein <bobg@z-code.z-code.com>
In-Reply-To: <Qggr1KIB0KGWI2LQQB@holmes.parc.xerox.com> References:
<sggg9z_0M2UD817MBh@thumper.bellcore.com> 
	<Qggr1KIB0KGWI2LQQB@holmes.parc.xerox.com>
Excerpts from mail: 6-Oct-93 Re: how to pipe mail messag.. Bill
Janssen@parc.xerox. (646)
> Thanks again, Nathaniel, but that doesn't do what I need.  What your >
example does is to write a version of the message, which includes two of
> the original headers, and the new header "Newsgroups" to a file, and >
then you write the body of the message to a file.  I'd like to write the
> entire original text of the message, including all headers, to a file
> (preferably in one fell swoop).
Well, I didn't claim that it would do precisely what you needed, merely
that it pointed you in the right direction.  I believe there are FLAMES
commands that you can use to get all the headers, and then you can write
them out, too, although not in one fell swoop.   But I'm not in a good
position to check the docs right now...
I don't recall there being any simple way, in FLAMES, to get at the
entire message including headers without building it up piece by piece,
but that doesn't mean there isn't one...  -- Nathaniel Return-path:
<atkbb+Bad-Addresses@andrew.cmu.edu> X-Andrew-Authenticated-as:
0;andrew.cmu.edu;Network-Mail Received: from andrew.cmu.edu via trymail
for info-andrew+@andrew.cmu.edu
(->+dist+/afs/andrew.cmu.edu/usr0/ak99/dists/info-andrew-nostrip.dl)    
      ID </afs/andrew.cmu.edu/usr22/susan/Mailbox/Yggrj4q00UdZE3mE4H>;  
        Wed,  6 Oct 1993 22:15:33 -0400 (EDT) Received: from
po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q003/QF.Yggri7W00Udd8oWE4Q>;        
  Wed,  6 Oct 1993 22:14:31 -0400 (EDT) If-Type-Unsupported: send
Received: from po5.andrew.cmu.edu via qmail           ID
</afs/andrew.cmu.edu/service/mailqs/q001/QF.oggrgZ600UddAoDk5c>;        
  Wed,  6 Oct 1993 22:12:53 -0400 (EDT) Received: from
nkosi.well.sf.ca.us (nkosi.well.sf.ca.us [192.132.30.4]) by
po5.andrew.cmu.edu (8.5/8.5) with ESMTP id WAA13368; Wed, 6 Oct 1993
22:12:47 -0400 Received: from localhost (uucp@localhost) by
nkosi.well.sf.ca.us (8.6/8.6) with UUCP id TAA15234; Wed, 6 Oct 1993
19:12:44 -0700 Received: from zindigo by z-code.com (4.1/NBN-16/ZC-13) 
	id AA06836; Wed, 6 Oct 93 19:07:46 PDT Received: by zindigo
(920330.SGI/920502.SGI)  	for lowery@z-code.z-code.com id AA21697; Wed,
6 Oct 93 19:08:22 -0700 From: "Bob Glickstein" <bobg@zindigo.z-code.com>
Message-Id: <9310061908.ZM21695@zindigo.z-code.com> Date: Wed, 6 Oct
1993 19:08:21 -0700 In-Reply-To: Nathaniel Borenstein
<nsb@thumper.bellcore.com>         "Re: how to pipe mail message through
a UNIX program using FLAMES?" (Oct  6,  9:43pm) References:
<sggg9z_0M2UD817MBh@thumper.bellcore.com>
	<Qggr1KIB0KGWI2LQQB@holmes.parc.xerox.com>
	<oggrEtS0M2UDRQsKxW@thumper.bellcore.com> Organization: Z-Code Software
Corp., Marin County, CA Reply-To: Bob Glickstein
<bobg@z-code.z-code.com> X-Face:
cTu(1t"PVo94xi/qo8b+3v2c!Z7L=['Qsl88|SNxe4_]b!VO([eyG:Qy[MHA%.E+,RD=Aq^dA
Mo{3BPX'VV>ZVFg,awoPYNP8Ca,>!u X-Mailer: Z-Mail-SGI (3.0B.106 6oct93
MediaMail) To: Nathaniel Borenstein <nsb@thumper.bellcore.com>,        
Bill Janssen <janssen@parc.xerox.com> Subject: Re: how to pipe mail
message through a UNIX program using FLAMES? Cc:
info-andrew@andrew.cmu.edu, steve@zindigo.z-code.com,        
lowery@zindigo.z-code.com Content-Type: text/plain; charset=us-ascii
Mime-Version: 1.0
Wow, is this ever nostalgic.
On Oct 6,  9:43pm, Nathaniel Borenstein wrote: > Excerpts from mail:
6-Oct-93 Re: how to pipe mail messag.. Bill > Janssen@parc.xerox. (646)
> > I'd like to write the entire original text of the message, > >
including all headers, to a file (preferably in one fell swoop). > > I
don't recall there being any simple way, in FLAMES, to get at the >
entire message including headers without building it up piece by >
piece, but that doesn't mean there isn't one...
Quite right.  In the following, I use "do" and "strcat".  I don't
remember whether FLAMES has "do", nor do I recall whether "strcat" is
the right function for concatenating strings, but you get the idea.
(defun write-msg-to-file (msg filename)   (WriteFile filename  	    
(strcat (do ((header-list (GetHeaderList msg)  				       (cdr
header-list))  			  (string "" (strcat string  					     (car (car
header-list))  					     ": "  					     (car (cdr (car header-list))) 
