From 67bf0fc111fe2ba140e1374bb755e3dcbe6d45a6 Mon Sep 17 00:00:00 2001
From: Bruce Momjian <bruce@momjian.us>
Date: Thu, 4 Oct 2001 15:48:37 +0000
Subject: [PATCH] elog command need to use unicode conversion too.

Vsevolod Lobko
---
 src/pl/tcl/pltcl.c | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/pl/tcl/pltcl.c b/src/pl/tcl/pltcl.c
index 73c5247e3c5..29d6559821b 100644
--- a/src/pl/tcl/pltcl.c
+++ b/src/pl/tcl/pltcl.c
@@ -31,7 +31,7 @@
  *	  ENHANCEMENTS, OR MODIFICATIONS.
  *
  * IDENTIFICATION
- *	  $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.41 2001/10/04 15:47:41 momjian Exp $
+ *	  $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.42 2001/10/04 15:48:37 momjian Exp $
  *
  **********************************************************************/
 
@@ -1372,7 +1372,9 @@ pltcl_elog(ClientData cdata, Tcl_Interp *interp,
 	 * Call elog(), restore the original restart address
 	 * and return to the caller (if not catched)
 	 ************************************************************/
-	elog(level, argv[2]);
+	UTF_BEGIN;
+	elog(level, UTF_U2E(argv[2]));
+	UTF_END;
 	memcpy(&Warn_restart, &save_restart, sizeof(Warn_restart));
 	return TCL_OK;
 }
-- 
GitLab