Index: src/backend/utils/adt/varlena.c
===================================================================
RCS file: /cvsroot/pgsql/src/backend/utils/adt/varlena.c,v
retrieving revision 1.74
diff -c -r1.74 varlena.c
*** src/backend/utils/adt/varlena.c	2001/10/25 05:49:46	1.74
--- src/backend/utils/adt/varlena.c	2001/11/18 19:11:52
***************
*** 273,284 ****
  Datum
  textoctetlen(PG_FUNCTION_ARGS)
  {
! 	struct varattrib *t = (struct varattrib *) PG_GETARG_RAW_VARLENA_P(0);
  
! 	if (!VARATT_IS_EXTERNAL(t))
! 		PG_RETURN_INT32(VARATT_SIZE(t) - VARHDRSZ);
! 
! 	PG_RETURN_INT32(t->va_content.va_external.va_extsize);
  }
  
  /*
--- 273,281 ----
  Datum
  textoctetlen(PG_FUNCTION_ARGS)
  {
! 	text    *arg = PG_GETARG_VARCHAR_P(0);
  
! 	PG_RETURN_INT32(VARSIZE(arg) - VARHDRSZ);
  }
  
  /*