DataMuseum.dk

top - metrics - download

    Length: 1164 (0x48c)
    Types: TextFile
    Names: »maildfk«

└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
    └─⟦c319c2751⟧ »unix3.0/TeX3.0.tar.Z« 
        └─⟦036c765ac⟧ 
            └─⟦this⟧ »TeX3.0/TeXcontrib/gnutex/maildfk« 

TextFile

#!/bin/sh
# maildfk - send mail to GnuTeX author to register use of program
#

# Don't do this more than once
if test ! -r FIRST 
then exit 
fi
    
echo ""
echo The author of GnuTeX would like to hear that you have a
echo copy. Unless you object, mail will be sent to him now.
echo This mail will be used only to see how many copies exist.
echo You can also ask to have your name added to the mailing list,
echo to keep you informed of future patches.
echo ""

echo -n Do you wish to have your name on the list '[y] '
read yes
if test -s "$yes" -o "$yes" = yes -o "$yes" = YES -o "$yes" = y -o "$yes" = Y
then
    echo Please enter your e-mail address from the ARPAnet:
    read addr
    name="Please put this name on the list: $addr"
else
    name="Please do not put me on the list."
fi

echo -n Do you wish to send the mail '[y] '
read yes
if test -s "$yes" -o "$yes" = yes -o "$yes" = YES -o "$yes" = y -o "$yes" = Y
then
    patch=`cat PATCHLEVEL`
    dfk=dfk@cs.duke.edu

    echo GnuTeX was installed here. $name \
    | mail -s "GnuTeX 1.$patch installed" $dfk
    echo mail sent to $dfk
else    
    echo No mail sent.
fi

# Don't run this again
rm FIRST