PERFORCE change 11205 for review
[email protected] (Chris Nandor) Sat, 7 Jul 2001 21:01:21 -0400
| Newsgroups | perl.perl5.changes.mac |
|---|---|
| Message-ID | <p05100316b76d614d0282@[10.0.1.177]> |
Change 11205 by pudge@pudge-mobile on 2001/07/07 23:55:56
Allow symbols in try_symbol() to begin with "_".
Affected files ...
... //depot/maint-5.6/macperl/makedef.pl#2 edit
Differences ...
==== //depot/maint-5.6/macperl/makedef.pl#2 (xtext) ====
Index: perl/makedef.pl
--- perl/makedef.pl.~1~ Sat Jul 7 18:00:06 2001
+++ perl/makedef.pl Sat Jul 7 18:00:06 2001
@@ -645,7 +645,7 @@
sub try_symbol {
my $symbol = shift;
- return if $symbol !~ /^[A-Za-z]/;
+ return if $symbol !~ /^[A-Za-z_]/;
return if $symbol =~ /^\#/;
$symbol =~s/\r//g;
chomp($symbol);
End of Patch.