¿Cómo obtengo las claves principales de una tabla de Postgres a través de plpgsql?

La consulta anterior es muy mala ya que es muy lenta.

Recomendaría esta versión oficial:

http://wiki.postgresql.org/wiki/Retrieve_primary_key_columns

si se necesita un esquema, la consulta es la siguiente

SELECT               
  pg_attribute.attname, 
  format_type(pg_attribute.atttypid, pg_attribute.atttypmod) 
FROM pg_index, pg_class, pg_attribute, pg_namespace 
WHERE 
  pg_class.oid = 'foo'::regclass AND 
  indrelid = pg_class.oid AND 
  nspname = 'public' AND 
  pg_class.relnamespace = pg_namespace.oid AND 
  pg_attribute.attrelid = pg_class.oid AND 
  pg_attribute.attnum = any(pg_index.indkey)
 AND indisprimary