--- trunk/sql/mkindex.pl 2005/07/24 15:35:46 33 +++ trunk/sql/mkindex.pl 2005/08/02 00:42:04 34 @@ -30,11 +30,12 @@ $out->{index}->{$2}->{$table} = $1; } - if (/\s*inherits\s*\(\s*(\S+)\s*\)/) { + if (/\s*inherits\s*\(\s*(\S+)\s*\)/i) { $out->{inherits}->{$table} = $1; } - if (s/^\s*(\S+)(.+?)references\s+(\S+)\s*\((\S+)\)/$1$2/i) { + if (s/^\s*(\S+)(.+?)references\s+(\S+)\s*\((\S+)\)/\t$1$2/i) { +# if (/^\s*(\S+)(.+?)references\s+(\S+)\s*\((\S+)\)/) { @{ $out->{references}->{$table}->{$1} } = ( $3, $4 ); } @@ -76,6 +77,7 @@ END IF; END; \$\$ language 'plpgsql'; +CREATE TRIGGER $func BEFORE INSERT ON $table FOR EACH ROW EXECUTE PROCEDURE $func(); }; } }