projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
c567d28
)
Undo part of change 6489 which looks like a bulk edit which
author
Nick Ing-Simmons
<nik@tiuk.ti.com>
Sat, 2 Sep 2000 12:26:04 +0000
(12:26 +0000)
committer
Nick Ing-Simmons
<nik@tiuk.ti.com>
Sat, 2 Sep 2000 12:26:04 +0000
(12:26 +0000)
changed _all_ gv_efullname3() calls to gv_efullname4() calls.
The supressing of main:: on return from select() is undesirable.
p4raw-id: //depot/perl@7003
pp_sys.c
patch
|
blob
|
history
diff --git
a/pp_sys.c
b/pp_sys.c
index
74011fb
..
e35cfd4
100644
(file)
--- a/
pp_sys.c
+++ b/
pp_sys.c
@@
-1083,7
+1083,7
@@
PP(pp_select)
else {
GV **gvp = (GV**)hv_fetch(hv, GvNAME(egv), GvNAMELEN(egv), FALSE);
if (gvp && *gvp == egv) {
- gv_efullname4(TARG, PL_defoutgv, Nullch,
FALS
E);
+ gv_efullname4(TARG, PL_defoutgv, Nullch,
TRU
E);
XPUSHTARG;
}
else {