david@wubios.wustl.edu (David J. Camp) (12/01/90)
This little program will allow you to read messages from a digest as
individual messages. From the elm menu, just type "|elmdigest" when
you are pointing to the digest. It will start a new session of elm
in a shell, with each messages from the digest as a separate message
in a temporary folder. The temporary folder will be deleted when
you exit elm, to return to the original session.
Please send me suggestions for improvements. -David-
#! /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 <file", e.g.. If this archive is complete, you
# will see the following message at the end:
# "End of shell archive."
# Contents: elmdigest dedigest
# Wrapped by david@wubios on Sat Dec 1 08:27:16 1990
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'elmdigest' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'elmdigest'\"
else
echo shar: Extracting \"'elmdigest'\" \(1097 characters\)
sed "s/^X//" >'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 "God loves material things."
X#
Xset -v
Xdedigest > /tmp/di$$
Xelm -f /tmp/di$$ < /dev/tty
X/bin/rm /tmp/di$$
END_OF_FILE
if test 1097 -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'\" \(1301 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 "God loves material things."
X#
Xwhile (<>)
X {
X if (/^-------------------------------*$/)
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 1301 -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