Index: src/backend/commands/functioncmds.c
===================================================================
RCS file: /cvsroot/pgsql-server/src/backend/commands/functioncmds.c,v
retrieving revision 1.33
diff -c -c -r1.33 functioncmds.c
*** src/backend/commands/functioncmds.c	4 Aug 2003 02:39:58 -0000	1.33
--- src/backend/commands/functioncmds.c	5 Sep 2003 15:56:57 -0000
***************
*** 435,444 ****
  								   PointerGetDatum(languageName),
  								   0, 0, 0);
  	if (!HeapTupleIsValid(languageTuple))
! 		ereport(ERROR,
! 				(errcode(ERRCODE_UNDEFINED_OBJECT),
! 				 errmsg("language \"%s\" does not exist", languageName)));
! 
  	languageOid = HeapTupleGetOid(languageTuple);
  	languageStruct = (Form_pg_language) GETSTRUCT(languageTuple);
  
--- 435,458 ----
  								   PointerGetDatum(languageName),
  								   0, 0, 0);
  	if (!HeapTupleIsValid(languageTuple))
! 	{
! 		/* Add any new languages to this list to invoke the hint. */
! 		if (strcmp(languageName, "plperl") != 0 &&
! 		    strcmp(languageName, "plpgsql") != 0 &&
! 		    strcmp(languageName, "plpython") != 0 &&
! 		    strcmp(languageName, "plr") != 0 &&
! 		    strcmp(languageName, "plsh") != 0 &&
! 		    strcmp(languageName, "pltcl") != 0)
! 			ereport(ERROR,
! 					(errcode(ERRCODE_UNDEFINED_OBJECT),
! 					 errmsg("language \"%s\" does not exist", languageName)));
! 		else
! 			ereport(ERROR,
! 					(errcode(ERRCODE_UNDEFINED_OBJECT),
! 					 errmsg("language \"%s\" does not exist", languageName),
! 					 errhint("You need to use 'createlang' to load the language into the database.")));
! 	}
! 	
  	languageOid = HeapTupleGetOid(languageTuple);
  	languageStruct = (Form_pg_language) GETSTRUCT(languageTuple);