1 --- mm2.7/src/metamail/mailto.c.cshfix Sat Oct 25 09:50:36 1997
2 +++ mm2.7/src/metamail/mailto.c Sat Oct 25 09:51:03 1997
7 - char *pager = getenv("PAGER");
8 char TmpName[100], CmdBuf[150];
12 + if ((pager = getenv("METAMAIL_PAGER")) == NULL)
13 + pager = getenv("PAGER");
15 strcpy(TmpName, tmpname());
16 fp = fopen(TmpName, "w");
17 --- mm2.7/src/bin/showexternal.cshfix Sat Oct 25 09:45:05 1997
18 +++ mm2.7/src/bin/showexternal Sat Oct 25 09:46:25 1997
20 if (! $?METAMAIL_TMPDIR) then
21 set METAMAIL_TMPDIR=/tmp
23 +if (! $?METAMAIL_PAGER) then
24 + set METAMAIL_PAGER=more
30 echo "Usage: showexternal body-file access-type name [site [directory [mode [server]]]]"
34 +# Check argument integrity. Don't trust mail headers
35 +switch ("$1$2$3$4$5$6$7")
37 + echo "Illegal white space in arguments -- possibly a mail bomb?!"
39 + echo \'$0\' \'$1\' \'$2\' \'$3\' \'$4\' \'$5\' \'$6\' \'$7\'
43 set atype=`echo $2 | tr ABCDEFGHIJKLMNOPQRSTUVWXYZ abcdefghijklmnopqrstuvwxyz`
69 sed -e 1,/^\$/d < $bodyfile >> ${METAMAIL_TMPDIR}/ext.junk.$$
70 - more ${METAMAIL_TMPDIR}/ext.junk.$$
71 + ${METAMAIL_PAGER} ${METAMAIL_TMPDIR}/ext.junk.$$
72 rm ${METAMAIL_TMPDIR}/ext.junk.$$
75 --- mm2.7/src/bin/showpartial.cshfix Sat Oct 25 09:46:37 1997
76 +++ mm2.7/src/bin/showpartial Sat Oct 25 09:47:24 1997
78 echo "Usage: showpartial file id partnum totalnum"
83 # This next line is because message-id can contain weird chars
84 set id=`echo $2 | tr -d \!\$\&\*\(\)\|\'\"\;\/\<\>\\`
86 if ($#argv == 3 || $4 == "") then
93 if (! -d $TREEROOT) then
94 --- mm2.7/src/bin/sun-message.csh.cshfix Sat Oct 25 09:49:16 1997
95 +++ mm2.7/src/bin/sun-message.csh Sat Oct 25 09:50:15 1997
100 +if (! $?METAMAIL_PAGER) then
101 + set METAMAIL_PAGER=more
104 if ($2 == "uuencode") then
108 cd /tmp; /bin/rm -rf /tmp/decode.$$
110 else if ($ans == 1) then
112 + ${METAMAIL_PAGER} $fn
113 else if ($ans == 2) then
115 echo -n "Save as: $HOME/"
121 + ${METAMAIL_PAGER} $1