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@turnstep.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,