===================================================================
RCS file: /cvs/cvsweb/cvsweb.cgi,v
retrieving revision 1.30
retrieving revision 1.33
diff -u -p -r1.30 -r1.33
--- cvsweb/cvsweb.cgi	1999/04/17 16:57:56	1.30
+++ cvsweb/cvsweb.cgi	1999/09/06 07:02:40	1.33
@@ -28,7 +28,7 @@
 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 # SUCH DAMAGE.
 #
-# $fId: cvsweb.cgi,v 1.29 1999/01/13 03:59:04 fenner Exp $
+# $FreeBSD$
 #
 
 
@@ -329,7 +329,7 @@ sub htmlify {
 	$string =~ s/>/>/g;
 
 	if ($pr) {
-		$string =~ s!\b((pr[:#]?\s*#?)|((bin|conf|docs|gnu|i386|kern|misc|ports)\/))(\d+)\b!<A HREF=/cgi/query-pr.cgi?pr=\5>$&</A>!ig;
+		$string =~ s!\b((pr[:#]?\s*#?)|((bin|conf|docs|gnu|i386|kern|misc|ports)\/))(\d+)\b!<A HREF=http://www.freebsd.org/cgi/query-pr.cgi?pr=\5>$&</A>!ig;
 	}
 
 	$string;
@@ -725,7 +725,7 @@ sub dolog {
 		print " <i>(vendor branch)</i>";
 	    }
 	    print " <i>" . &ctime($date{$_}) . " UTC</i> by ";
-	    print "<i>" . $author{$_} . "</i>\n";
+	    print "<i><a href=\"mailto:" . $author{$_} . "\@FreeBSD.org\">" . $author{$_} . "</a></i>\n";
 	    if ($revsym{$_}) {
 		print "<BR>CVS Tags: <b>$revsym{$_}</b>";
 	    }