Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit7c10662

Browse files
committed
Fix a few missed NOIND usages.
1 parent0acd843 commit7c10662

File tree

7 files changed

+6
-22
lines changed

7 files changed

+6
-22
lines changed

‎doc/src/sgml/pltcl.sgml

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
<!--
2-
$Header: /cvsroot/pgsql/doc/src/sgml/pltcl.sgml,v 2.10 2001/05/12 22:51:35 petere Exp $
2+
$Header: /cvsroot/pgsql/doc/src/sgml/pltcl.sgml,v 2.11 2001/06/09 02:19:07 tgl Exp $
33
-->
44

55
<chapter id="pltcl">
@@ -348,7 +348,7 @@ CREATE TRIGGER trig_mytab_modcount BEFORE INSERT OR UPDATE ON mytab
348348
<listitem>
349349
<para>
350350
Fire a log message. Possible levels are NOTICE, ERROR,
351-
FATAL,DEBUGandNOIND
351+
FATAL, andDEBUG
352352
as for the <function>elog</function> C function.
353353
</para>
354354
</listitem>

‎src/pl/plperl/SPI.xs

Lines changed: 0 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -61,9 +61,6 @@ elog_elog(level, message)
6161
elog(level,message);
6262

6363

64-
int
65-
elog_NOIND()
66-
6764
int
6865
elog_DEBUG()
6966

‎src/pl/plperl/eloglvl.c

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -22,12 +22,6 @@ elog_ERROR(void)
2222
returnERROR;
2323
}
2424

25-
int
26-
elog_NOIND(void)
27-
{
28-
returnNOIND;
29-
}
30-
3125
int
3226
elog_NOTICE(void)
3327
{

‎src/pl/plperl/eloglvl.h

Lines changed: 0 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -5,7 +5,4 @@ int
55
int
66
elog_ERROR(void);
77

8-
int
9-
elog_NOIND(void);
10-
118
intelog_NOTICE(void);

‎src/pl/plperl/plperl.c

Lines changed: 2 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -33,7 +33,7 @@
3333
* ENHANCEMENTS, OR MODIFICATIONS.
3434
*
3535
* IDENTIFICATION
36-
* $Header: /cvsroot/pgsql/src/pl/plperl/plperl.c,v 1.20 2001/06/01 18:17:44 tgl Exp $
36+
* $Header: /cvsroot/pgsql/src/pl/plperl/plperl.c,v 1.21 2001/06/09 02:19:07 tgl Exp $
3737
*
3838
**********************************************************************/
3939

@@ -252,7 +252,7 @@ plperl_init_safe_interp(void)
252252
*/
253253
"require Safe; SPI::bootstrap();"
254254
"sub ::mksafefunc { my $x = new Safe; $x->permit_only(':default');$x->permit(':base_math');"
255-
"$x->share(qw[&elog &DEBUG &NOTICE &NOIND &ERROR]);"
255+
"$x->share(qw[&elog &DEBUG &NOTICE &ERROR]);"
256256
" return $x->reval(qq[sub { $_[0] }]); }"
257257
};
258258

@@ -1192,8 +1192,6 @@ plperl_elog(ClientData cdata, Tcl_Interp *interp,
11921192
level=FATAL;
11931193
elseif (strcmp(argv[1],"DEBUG")==0)
11941194
level=DEBUG;
1195-
elseif (strcmp(argv[1],"NOIND")==0)
1196-
level=NOIND;
11971195
else
11981196
{
11991197
Tcl_AppendResult(interp,"Unknown elog level '",argv[1],

‎src/pl/tcl/pltcl.c

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -31,7 +31,7 @@
3131
* ENHANCEMENTS, OR MODIFICATIONS.
3232
*
3333
* IDENTIFICATION
34-
* $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.36 2001/06/01 18:17:44 tgl Exp $
34+
* $Header: /cvsroot/pgsql/src/pl/tcl/pltcl.c,v 1.37 2001/06/09 02:19:07 tgl Exp $
3535
*
3636
**********************************************************************/
3737

@@ -1295,8 +1295,6 @@ pltcl_elog(ClientData cdata, Tcl_Interp *interp,
12951295
level=FATAL;
12961296
elseif (strcmp(argv[1],"DEBUG")==0)
12971297
level=DEBUG;
1298-
elseif (strcmp(argv[1],"NOIND")==0)
1299-
level=NOIND;
13001298
else
13011299
{
13021300
Tcl_AppendResult(interp,"Unknown elog level '",argv[1],

‎src/pl/tcl/pltcl_guide.nr

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -268,7 +268,7 @@ the body of a PL/Tcl procedure:
268268
elog level msg
269269
.br
270270
Fire a log message. Possible levels are NOTICE, WARN, ERROR,
271-
FATAL,DEBUGandNOIND
271+
FATAL, andDEBUG
272272
like for the elog() C function.
273273

274274
.ti-4

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp