🚀 go-pugleaf

I have added a little bit of code to FORWARD MAILER (same for 2.07 & .08)
-----------------
/* change explicit forwards to self to * */

If translate(word(cmdstring,1)) = 'FOR' then Do
  Parse Upper Var cmdstring cmd1 firstid cmd2 secondid .
  check1 = Index(firstid,'@')
  check2 = Index(secondid,'@')
  If check1 > 0 then Do
    firstnode = Substr(firstid,check1+1)
    If firstnode = homenode then firstid = Delstr(firstid,check1)
  End
  Else firstnode = homenode
  If check2 > 0 then Do
    secondnode = Substr(secondid,check2+1)
    If secondnode = homenode then secondid = Delstr(secondid,check2)
  End
  Else secondnode = homenode
  If (firstid = secondid) & (firstnode = secondnode)
     then cmdstring = cmd1 firstid cmd2 '*'
  If requestornode ^= firstnode  then  do
    'CP MSG' requestorid 'You can''t establish forwards for remote users'
     exitrc=8
     signal exit
  End
End
Else Do
  Parse Upper Var cmdstring cmd2 secondid .
  check = Index(secondid,'@')
  If check > 0 then Do
    secondnode = Substr(secondid,check+1)
    If secondnode = homenode then secondid = Delstr(secondid,check)
  End
  If requestorid = secondid then cmdstring = cmd2 '*'
End
---------------
FORWARD MAILER gets 'secondnode' from parsing the command sent to it by the
user and checking for an occurrence of the user's nodename. For us it works
for bitnet and internet names because of our naming conventions. For you,
you may have to check for an explicit internet address.

What I REALLY love is when Joe B. on machine A forwards his mail to machine
B where he has mail forwarded to machine A.......

Sheila Patterson, Systems    Interbit Postmaster
321 CCC - Cornell University
Ithaca, NY  14853
(607) 255-5388

On Fri, 21 Feb 1992 17:27:00 EST John F. Chandler said:
>> Q1: Is there a bug in Mailer 2.07's FORWARDing routine:
>...
>> Userx did not know about the FORWARD ADD <*> option.
>
>Yes, there is a bug, but I believe it has been called too hard to fix.
>The remedy is to educate users not to forward in circles.  That is
>the intended purpose of ADD *.
>
>                                       John