diff options
| author | Peter Eisentraut | 2013-11-10 14:20:52 +0000 |
|---|---|---|
| committer | Peter Eisentraut | 2013-11-10 19:48:29 +0000 |
| commit | 001e114b8d59f4eaf2a314a2bc5e57078afdf82f (patch) | |
| tree | 606fa622be346ef917886a29aea7e17383e00d31 /src/pl/tcl | |
| parent | dca09ac53329e92d73f45674957c26d3d7ae5117 (diff) | |
Fix whitespace issues found by git diff --check, add gitattributes
Set per file type attributes in .gitattributes to fine-tune whitespace
checks. With the associated cleanups, the tree is now clean for git
Diffstat (limited to 'src/pl/tcl')
| -rw-r--r-- | src/pl/tcl/expected/pltcl_setup.out | 10 | ||||
| -rw-r--r-- | src/pl/tcl/modules/pltcl_listmod.in | 4 | ||||
| -rw-r--r-- | src/pl/tcl/modules/pltcl_loadmod.in | 4 | ||||
| -rw-r--r-- | src/pl/tcl/sql/pltcl_setup.sql | 10 |
4 files changed, 14 insertions, 14 deletions
diff --git a/src/pl/tcl/expected/pltcl_setup.out b/src/pl/tcl/expected/pltcl_setup.out index 3f36a80525..c4cdb26bde 100644 --- a/src/pl/tcl/expected/pltcl_setup.out +++ b/src/pl/tcl/expected/pltcl_setup.out @@ -38,7 +38,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]] @@ -55,8 +55,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]*} ] @@ -72,10 +72,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" } } diff --git a/src/pl/tcl/modules/pltcl_listmod.in b/src/pl/tcl/modules/pltcl_listmod.in index 231cb3f316..7d930ff0ea 100644 --- a/src/pl/tcl/modules/pltcl_listmod.in +++ b/src/pl/tcl/modules/pltcl_listmod.in @@ -109,8 +109,8 @@ set conn [eval pg_connect $dbname $options] if {$i == $argc} { pg_select $conn "select distinct modname from pltcl_modules \ - order by modname" \ - MOD { + order by modname" \ + MOD { listmodule $conn $MOD(modname) } } else { diff --git a/src/pl/tcl/modules/pltcl_loadmod.in b/src/pl/tcl/modules/pltcl_loadmod.in index c26e2a229e..645c6bbd9c 100644 --- a/src/pl/tcl/modules/pltcl_loadmod.in +++ b/src/pl/tcl/modules/pltcl_loadmod.in @@ -84,7 +84,7 @@ proc __PLTcl_loadmod_check_table {conn tabname expnames exptypes} { set found 0 pg_select $conn "select C.relname, A.attname, A.attnum, T.typname \ - from pg_catalog.pg_class C, pg_catalog.pg_attribute A, pg_catalog.pg_type T \ + from pg_catalog.pg_class C, pg_catalog.pg_attribute A, pg_catalog.pg_type T \ where C.relname = '$tabname' \ and A.attrelid = C.oid \ and A.attnum > 0 \ @@ -449,7 +449,7 @@ proc __PLTcl_loadmod_load_modules {conn} { set srctext [string range $srctext 4000 end] pg_result [ \ - pg_exec $conn "insert into pltcl_modules values ( \ + pg_exec $conn "insert into pltcl_modules values ( \ '$xname', $i, '$xpart')" \ ] -clear incr i diff --git a/src/pl/tcl/sql/pltcl_setup.sql b/src/pl/tcl/sql/pltcl_setup.sql index df7f9fadd1..0ac6669c6e 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" } } |
