diff options
Diffstat (limited to 'src/pl/tcl/pltcl.c')
| -rw-r--r-- | src/pl/tcl/pltcl.c | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/src/pl/tcl/pltcl.c b/src/pl/tcl/pltcl.c index e9fdf9fc38f..1bbab485d1c 100644 --- a/src/pl/tcl/pltcl.c +++ b/src/pl/tcl/pltcl.c @@ -2,7 +2,7 @@ * pltcl.c - PostgreSQL support for Tcl as * procedural language (PL) * - * $PostgreSQL: pgsql/src/pl/tcl/pltcl.c,v 1.121 2008/06/17 00:52:43 tgl Exp $ + * $PostgreSQL: pgsql/src/pl/tcl/pltcl.c,v 1.122 2008/10/09 17:24:05 alvherre Exp $ * **********************************************************************/ @@ -41,6 +41,10 @@ #define Tcl_GetStringResult(interp) ((interp)->result) #endif +/* define our text domain for translations */ +#undef TEXTDOMAIN +#define TEXTDOMAIN "pltcl" + #if defined(UNICODE_CONVERSION) && HAVE_TCL_VERSION(8,1) #include "mb/pg_wchar.h" @@ -263,6 +267,8 @@ _PG_init(void) if (pltcl_pm_init_done) return; + set_text_domain(TEXTDOMAIN); + #ifdef WIN32 /* Required on win32 to prevent error loading init.tcl */ Tcl_FindExecutable(""); |