Date: Thu, 19 Jun 1997 17:20:12 -0400
From: Jim Kingdon <kingdon@cyclic.com>

Index: src/client.c
===================================================================
RCS file: /home2/cvsroot/ccvs/src/client.c,v
retrieving revision 1.206
diff -c -r1.206 client.c
*** client.c	1997/06/17 21:37:25	1.206
--- client.c	1997/06/19 16:07:17
***************
*** 3233,3238 ****
--- 3233,3251 ----
  auth_server_port_number ()
  {
      struct servent *s = getservbyname ("cvspserver", "tcp");
+ #if 1  /* for debugging */
+     char *portstr;
+ 
+     /* There is a certain sentiment that this sort of thing is abuse
+        of environment variables and that this info should be elsewhere
+        (encoded in the CVSROOT, presumably).  Certainly that is the
+        winning thing if you are using CVS servers which use different
+        ports.  I suppose the other issue is how much to allow/encourage
+        use of non-standard ports.  */
+     portstr = getenv ("CVS_AUTH_PORT");
+     if (portstr != NULL)
+ 	return atoi (portstr);
+ #endif
  
      if (s)
  	return ntohs (s->s_port);