diff options
Diffstat (limited to 'src/pl/tcl/sql/pltcl_setup.sql')
| -rw-r--r-- | src/pl/tcl/sql/pltcl_setup.sql | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/pl/tcl/sql/pltcl_setup.sql b/src/pl/tcl/sql/pltcl_setup.sql index df7f9fadd18..0ac6669c6ef 100644 --- a/src/pl/tcl/sql/pltcl_setup.sql +++ b/src/pl/tcl/sql/pltcl_setup.sql @@ -43,7 +43,7 @@ create function check_pkey1_exists(int4, bpchar) returns bool as E' set GD(plan) [spi_prepare \\ "select 1 from T_pkey1 \\ where key1 = \\$1 and key2 = \\$2" \\ - {int4 bpchar}] + {int4 bpchar}] } set n [spi_execp -count 1 $GD(plan) [list $1 $2]] @@ -65,8 +65,8 @@ CREATE VIEW trigger_test_view AS SELECT * FROM trigger_test; CREATE FUNCTION trigger_data() returns trigger language pltcl as $_$ if { [info exists TG_relid] } { - set TG_relid "bogus:12345" - } + set TG_relid "bogus:12345" + } set dnames [info locals {[a-zA-Z]*} ] @@ -82,10 +82,10 @@ CREATE FUNCTION trigger_data() returns trigger language pltcl as $_$ set str "$str$akey: $val" } set str "$str}" - elog NOTICE "$key: $str" + elog NOTICE "$key: $str" } else { set val [eval list "\$$key" ] - elog NOTICE "$key: $val" + elog NOTICE "$key: $val" } } |