os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Add '<' and '>' symbols around email addresses in the originator line.

Browse source 
It used to look like:

Originator:
	Joe Blow joe@blow.net

and now looks like:

Originator:
	Joe Blow <joe@blow.net>

with the email address being a hypertext link in both cases.
This commit is contained in:
Chris Costello 2000-01-16 02:46:36 +00:00
parent 602ff363d5
commit 8d4363944d
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/www/; revision=6381
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
en/cgi/query-pr.cgi
View file

@ -1,5 +1,5 @@
#!/usr/bin/perl
# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.18 1999/12/21 17:34:21 phantom Exp $
# $FreeBSD: www/en/cgi/query-pr.cgi,v 1.19 2000/01/05 15:47:45 phantom Exp $
$ENV{'PATH'} = "/bin:/usr/bin:/usr/sbin:/sbin:/usr/local/bin";
@ -136,7 +136,7 @@ while(<Q>) {
$trailer .= $2;
}
if ($1 eq "Originator" && $from ne "") { # add email address
$trailer .= " <A HREF=\"mailto:$email\">" . &fixline($from) . "</A>";
$trailer .= " &lt;<A HREF=\"mailto:$email\">" . &fixline($from) . "</A>&gt;";
}
$blank = !($2);
$multiline = 0;