bryan@chroma.UUCP (Bryan Ford) (06/09/89)
I thought somebody might like this little script. It was originally written by a friend of mine as a complete 'Mail' replacement - I just turned it into a front-end for the normal 'Mail' program using ConMan's Queue command. (You have to be using ConMan for this to work.) The only things that should need changing are a few places in the 'read your own mail' part, which are clearly marked. I have also included a sample .mailrc file, so you can just add your own addresses. # This is a shell archive. Remove anything before this line, # then unpack it by saving it in a file and typing "sh file" # Created Sat Jun 10 08:01:52 1989 # # This archive contains: # Mail # .mailrc echo "Creating Mail" cat > Mail <<"***EOF Mail***" .key recipient .bra { .ket } ; ; Mail ; Script file for reading sending mail. ; If "{recipient}" EQ "" Echo "Read own mail." If EXISTS UUCP:mail/bryan ; Replace Bryan with your username (3 places) Ed UUCP:mail/bryan ; Replace Ed with your favorite editor Else Echo "No mail for Bryan." EndIf Skip out Else Search S:.mailrc {recipient} NONUM CASE | Read ALIAS NAME PATH If VAL "$?" EQ 1 Ask "No alias for {recipient} - Do you want to continue?" If NOT WARN Skip out EndIf Set PATH {recipient} EndIf Echo "Path: $PATH" Queue $PATH Mail EndIf Lab out Set ALIAS Set NAME Set PATH ***EOF Mail*** echo "Creating .mailrc" cat > .mailrc <<"***EOF .mailrc***" alias bryan bryan@geo-works.COM alias csa comp-sys-amiga@ucbvax.berkeley.EDU alias csat comp-sys-amiga-tech@ucbvax.berkeley.EDU alias kilowatt archive-server@kilowatt.sun.COM alias whawes hawes@dino.ulowell.EDU ***EOF .mailrc***