Index: src/backend/utils/mb/encnames.c
===================================================================
RCS file: /cvsroot/pgsql-server/src/backend/utils/mb/encnames.c,v
retrieving revision 1.10
diff -c -c -r1.10 encnames.c
*** src/backend/utils/mb/encnames.c	4 Sep 2002 20:31:31 -0000	1.10
--- src/backend/utils/mb/encnames.c	5 Dec 2002 23:19:40 -0000
***************
*** 407,413 ****
  	for (p = key, np = newkey; *p != '\0'; p++)
  	{
  		if (isalnum((unsigned char) *p))
! 			*np++ = tolower((unsigned char) *p);
  	}
  	*np = '\0';
  	return newkey;
--- 407,418 ----
  	for (p = key, np = newkey; *p != '\0'; p++)
  	{
  		if (isalnum((unsigned char) *p))
! 		{
! 			if (*p >= 'A' && *p <= 'Z')
! 				*np++ = *p + 'a' - 'A';
! 			else
! 				*np++ = *p;
! 		}
  	}
  	*np = '\0';
  	return newkey;