github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 15:27:28 +00:00
Code Issues Releases Wiki Activity

Updated PWORD to not add an MIT- prefix to machine names in emails.

Browse Source
This commit is contained in:
Eric Swenson 2019-02-23 13:23:36 -08:00
parent bb69c7e680
commit bf6d2a9ad2
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/sysen1/pword.2661 → src/sysen1/pword.2662
View File

@ -8431,7 +8431,7 @@ sndltp: -10,,snddsc ; Just header
snddsc: 440700,,[asciz /[Message from /]
tp$6bt runame
440700,,[asciz / at MIT-/]
440700,,[asciz / at /]
tp$6bt machin
440700,,[asciz / /]
tp$6bt a
@ -9601,7 +9601,7 @@ ife $$pand,[
hrrzs t ; flush the op-code part
cain t,telmal ; Is this notification mail?
jrst [
type dsko,/ MIT-/
type dsko,/ /
6type dsko,machin ; tell where to send it
type dsko,/ (R-HEADER-FORCE NULL)/ ; force into RFC733 format
jrst .+1]
@ -9662,10 +9662,10 @@ From: / ; now for the FROM: field
setom mdlflg
typout dsko,[tp$6bt uname] ; tell the UNAME involved
setzm mdlflg
type dsko,/ at MIT-/
type dsko,/ at /
6type dsko,machin ; tell where
type dsko,/>
To: USER-ACCOUNTS at MIT-/
To: USER-ACCOUNTS at /
6type dsko,machin ; tell where
type dsko,/
/