diff options
| author | Tom Lane <tgl@sss.pgh.pa.us> | 2001-09-17 00:42:42 +0000 |
|---|---|---|
| committer | Tom Lane <tgl@sss.pgh.pa.us> | 2001-09-17 00:42:42 +0000 |
| commit | ec7ddc158680b5302995f32400c6b17f15dab875 (patch) | |
| tree | 4641a947453629b242ea8fe7ef334d8c4a5057b1 /src/interfaces/libpgtcl/pgtcl.c | |
| parent | 220ae48ccaebafd74074d0be5eae0080116951c9 (diff) | |
| download | postgresql-ec7ddc158680b5302995f32400c6b17f15dab875.tar.gz | |
Use portable putenv(), not unportable setenv().
Diffstat (limited to 'src/interfaces/libpgtcl/pgtcl.c')
| -rw-r--r-- | src/interfaces/libpgtcl/pgtcl.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/interfaces/libpgtcl/pgtcl.c b/src/interfaces/libpgtcl/pgtcl.c index 64a3246487..10f2ab0396 100644 --- a/src/interfaces/libpgtcl/pgtcl.c +++ b/src/interfaces/libpgtcl/pgtcl.c @@ -10,7 +10,7 @@ * * * IDENTIFICATION - * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.22 2001/09/10 14:49:12 momjian Exp $ + * $Header: /cvsroot/pgsql/src/interfaces/libpgtcl/Attic/pgtcl.c,v 1.23 2001/09/17 00:42:42 tgl Exp $ * *------------------------------------------------------------------------- */ @@ -45,7 +45,8 @@ Pgtcl_Init(Tcl_Interp *interp) * Therefore PGCLIENTENCODING must be set to UNICODE for these versions. */ Tcl_GetDouble(interp, Tcl_GetVar(interp, "tcl_version", TCL_GLOBAL_ONLY), &tclversion); - if (tclversion >= 8.1) setenv("PGCLIENTENCODING", "UNICODE", 1); + if (tclversion >= 8.1) + putenv("PGCLIENTENCODING=UNICODE"); /* register all pgtcl commands */ Tcl_CreateCommand(interp, |