projects
/
p5sagit/p5-mst-13.2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
Down with C++ reserved names
[p5sagit/p5-mst-13.2.git]
/
util.c
diff --git
a/util.c
b/util.c
index
ab39df9
..
010507d
100644
(file)
--- a/
util.c
+++ b/
util.c
@@
-2816,7
+2816,7
@@
Perl_find_script(pTHX_ const char *scriptname, bool dosearch, const char **searc
if (strEQ(scriptname, "-"))
dosearch = 0;
if (dosearch) { /* Look in '.' first. */
- char *cur = scriptname;
+ const char *cur = scriptname;
#ifdef SEARCH_EXTS
if ((curext = strrchr(scriptname,'.'))) /* possible current ext */
while (ext[i])