Patches for cvs and cvslog

[Lars Magne Ingebrigtsen <larsi@gnus.org>]

I've applied the following patch from Jason L Tibbitts III:

--- server.c.orig	Thu Sep 24 19:17:31 1998
+++ server.c	Wed Nov 11 09:43:00 1998
@@ -5060,6 +5060,7 @@
 {
     int rc;
     char *host_user = NULL;
+    char *env;
 
     /* First we see if this user has a password in the CVS-specific
        password file.  If so, that's enough to authenticate with.  If
@@ -5175,6 +5176,10 @@
            It might or might not be the same as host_user. */
         CVS_Username = xmalloc (strlen (username) + 1);
         strcpy (CVS_Username, username);
+
+	env = xmalloc (sizeof "CVSUSER=" + strlen (CVS_Username));
+	(void) sprintf (env, "CVSUSER=%s", CVS_Username);
+	(void) putenv (env);
     }
 
     return host_user;

And then did the following change myself:
     
--- cvslog~	Sun Dec 30 07:07:35 2001
+++ cvslog	Tue Jan  1 08:28:44 2002
@@ -409,7 +409,7 @@
 # information about the change.  Returns the header as a list.
 sub build_header {
     my ($data, $showdir) = @_;
-    my $user = (getpwuid $<)[0] || $<;
+    my $user = $ENV{CVSUSER} || (getpwuid $<)[0] || $<;
     my $date = strftime ('%A, %B %e, %Y @ %T', localtime time);
     $date =~ s/  / /;
     my @header;


And now the log messages has the user name of the person who commits,
and not just "cvs".
     
-- 
(domestic pets only, the antidote for overdose, milk.)
   larsi@gnus.org * Lars Magne Ingebrigtsen