Have psql \dD show checks

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Patch to show check information when listing domains via \dD in psql.
Per question by Edmund Bacon on the pgsql-general list.

- --
Greg Sabino Mullane greg(at)turnstep(dot)com
PGP Key: 0x14964AC8 200504030911
http://biglumber.com/x/web?pk=2529DF6AB8F79407E94445B4BC9B906714964AC8
-----BEGIN PGP SIGNATURE-----

iD8DBQFCT+t8vJuQZxSWSsgRAog3AJwOp8ac7xvgQ1lt2sDTu2hwAr63hwCfYz2T
GqxgS3t64mF4Vn8Ie5n8hvo=
=a1GE
-----END PGP SIGNATURE-----

Index: describe.c
===================================================================
RCS file: /projects/cvsroot/pgsql/src/bin/psql/describe.c,v
retrieving revision 1.114
diff -c -r1.114 describe.c
*** describe.c 1 Apr 2005 05:30:38 -0000 1.114
--- describe.c 3 Apr 2005 13:07:14 -0000
***************
*** 1579,1592 ****
" WHEN t.typnotnull AND t.typdefault IS NULL THEN 'not null'\n"
" WHEN NOT t.typnotnull AND t.typdefault IS NOT NULL THEN 'default '||t.typdefault\n"
" ELSE ''\n"
! " END as \"%s\"\n"
"FROM pg_catalog.pg_type t\n"
! " LEFT JOIN pg_catalog.pg_namespace n ON n.oid = t.typnamespace\n"
"WHERE t.typtype = 'd'\n",
_("Schema"),
_("Name"),
_("Type"),
! _("Modifier"));

processNamePattern(&buf, pattern, true, false,
"n.nspname", "t.typname", NULL,
--- 1579,1595 ----
" WHEN t.typnotnull AND t.typdefault IS NULL THEN 'not null'\n"
" WHEN NOT t.typnotnull AND t.typdefault IS NOT NULL THEN 'default '||t.typdefault\n"
" ELSE ''\n"
! " END as \"%s\",\n"
! " pg_catalog.pg_get_constraintdef(r.oid, true) as \"%s\"\n"
"FROM pg_catalog.pg_type t\n"
! " JOIN pg_catalog.pg_namespace n ON n.oid = t.typnamespace\n"
! " LEFT JOIN pg_catalog.pg_constraint r ON t.oid = r.contypid\n"
"WHERE t.typtype = 'd'\n",
_("Schema"),
_("Name"),
_("Type"),
! _("Modifier"),
! _("Check"));

processNamePattern(&buf, pattern, true, false,
"n.nspname", "t.typname", NULL,