tab/mail.flt

   1 # $Id: mail.flt,v 1.2 1996-06-11 10:53:55 quinn Exp $
   2 BEGIN                           { begin record wais }
   3 /^From:/        BODY    /$/     { data -element name $1 }
   4 /^Subject:/     BODY    /$/     { data -element title $1 }
   5 /^Date:/        BODY    /$/     { data -element date $1 }
   6 /^$/            BODY    /^From /        {
   7                                                 data -text -element Body $1
   8                                                 unread 2
   9                                                 end record
  10                                         }