Path: utzoo!utgpu!news-server.csri.toronto.edu!rutgers!sun-barr!cs.utexas.edu!wuarchive!wubios!david From: david@wubios.wustl.edu (David J. Camp) Newsgroups: comp.mail.elm Subject: elm dedigestifier Message-ID: <1990Nov4.084839.7498@wubios.wustl.edu> Date: 4 Nov 90 08:48:39 GMT Sender: david@wubios.wustl.edu (David J. Camp) Organization: Division of Biostatistics, WUMS, St. Louis, MO Lines: 114 Here is a program I wrote that will allow you to convert an email digest into a folder, and run elm. From the elm menu prompt, type: |elmdigest and you will start a child session of elm on the folder containing the messages from the digest. This requires that perl be installed, but perl (and elmdigest) are free. The temporary file containing the folder will be deleted when you exit elmdigest to return to the original elm session. -David- david@wubios.wustl.edu ^ Mr. David J. Camp david%wubios@wugate.wustl.edu < * > +1 314 382 0584 ...!uunet!wugate!wubios!david v "God loves material things." #! /bin/sh # This is a shell archive. Remove anything before this line, then unpack # it by saving it into a file and typing "sh file". To overwrite existing # files, type "sh file -c". You can also feed this as standard input via # unshar, or by typing "sh 'elmdigest' <<'END_OF_FILE' X#! /bin/sh X# This is 'elmdigest', a program to view a folder made from a digest. X# Copyright (C) 1990 David J. Camp X# X# This program is free software; you can redistribute it and/or modify X# it under the terms of the GNU General Public License as published by X# the Free Software Foundation; either version 1, or (at your option) X# any later version. X# X# This program is distributed in the hope that it will be useful, X# but WITHOUT ANY WARRANTY; without even the implied warranty of X# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the X# GNU General Public License for more details. X# X# You should have received a copy of the GNU General Public License X# along with this program; if not, write to the Free Software X# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. X# X#david@wubios.wustl.edu ^ Mr. David J. Camp X#david%wubios@wugate.wustl.edu < * > +1 314 382 0584 X#...!uunet!wugate!wubios!david v X# "Think about something else." X# Xset -v Xdedigest > /tmp/di$$ Xelm -f /tmp/di$$ < /dev/tty X/bin/rm /tmp/di$$ END_OF_FILE if test 1154 -ne `wc -c <'elmdigest'`; then echo shar: \"'elmdigest'\" unpacked with wrong size! fi chmod +x 'elmdigest' # end of 'elmdigest' fi if test -f 'dedigest' -a "${1}" != "-c" ; then echo shar: Will not clobber existing file \"'dedigest'\" else echo shar: Extracting \"'dedigest'\" \(1348 characters\) sed "s/^X//" >'dedigest' <<'END_OF_FILE' X#! /usr/bin/perl X# This is 'dedigest' a program to convert a digest to a folder. X# Copyright (C) 1990 David J. Camp X# X# This program is free software; you can redistribute it and/or modify X# it under the terms of the GNU General Public License as published by X# the Free Software Foundation; either version 1, or (at your option) X# any later version. X# X# This program is distributed in the hope that it will be useful, X# but WITHOUT ANY WARRANTY; without even the implied warranty of X# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the X# GNU General Public License for more details. X# X# You should have received a copy of the GNU General Public License X# along with this program; if not, write to the Free Software X# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. X# X#david@wubios.wustl.edu ^ Mr. David J. Camp X#david%wubios@wugate.wustl.edu < * > +1 314 382 0584 X#...!uunet!wugate!wubios!david v X# "Think about something else." X# Xwhile (<>) X { X if (substr ($_, 0, 3) eq "---") X { X print "From dummy Wed Feb 29 12:12:12 1990\n"; X do X { X $_ = <>; X } X until (eof() || 0 != tr/\041-\177/\041-\177/); X } X print $_; X } END_OF_FILE if test 1348 -ne `wc -c <'dedigest'`; then echo shar: \"'dedigest'\" unpacked with wrong size! fi chmod +x 'dedigest' # end of 'dedigest' fi echo shar: End of shell archive. exit 0