diff options
Diffstat (limited to 'src/pl/tcl/pltcl.c')
| -rw-r--r-- | src/pl/tcl/pltcl.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pl/tcl/pltcl.c b/src/pl/tcl/pltcl.c index 336b837c961..96bf073ed41 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.49 2002/01/24 19:31:36 tgl Exp $ + * $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.50 2002/03/02 21:39:35 momjian Exp $ * **********************************************************************/ @@ -1268,7 +1268,7 @@ pltcl_elog(ClientData cdata, Tcl_Interp *interp, else if (strcmp(argv[1], "FATAL") == 0) level = FATAL; else if (strcmp(argv[1], "DEBUG") == 0) - level = DEBUG; + level = DEBUG1; else { Tcl_AppendResult(interp, "Unknown elog level '", argv[1], |