diff options
| author | Karl Williamson <khw@cpan.org> | 2014-05-05 18:14:55 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2014-05-31 11:31:37 -0600 |
| commit | 09be812375d15ad2e53923ffde9ee8117d89d3ef (patch) | |
| tree | 520b738cd306ef77afc97e1b7a45cad62088de04 | |
| parent | 3ffc8c70ad4af0e7b2b5d389df0f84b6335fc315 (diff) | |
| download | perl-09be812375d15ad2e53923ffde9ee8117d89d3ef.tar.gz | |
regen/regcharclass.pl: make a 'do' into a 'require'
This is because a future commit will execute this code multiple times,
and the library file should only be read once.
| -rw-r--r-- | regcharclass.h | 1 | ||||
| -rwxr-xr-x | regen/regcharclass.pl | 2 |
2 files changed, 1 insertions, 2 deletions
diff --git a/regcharclass.h b/regcharclass.h index bbf8042002..3c54f2f36f 100644 --- a/regcharclass.h +++ b/regcharclass.h @@ -361,7 +361,6 @@ /* MULTI_CHAR_FOLD: multi-char strings that are folded to by a single character - do regen/regcharclass_multi_char_folds.pl ®charclass_multi_char_folds::multi_char_folds(1) */ /*** GENERATED CODE ***/ diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl index 9f1c9c0ce8..8c36b03a02 100755 --- a/regen/regcharclass.pl +++ b/regen/regcharclass.pl @@ -15,6 +15,7 @@ $|=1 if DEBUG; sub ASCII_PLATFORM { (ord('A') == 65) } require 'regen/regen_lib.pl'; +require "regen/regcharclass_multi_char_folds.pl"; =head1 NAME @@ -1635,7 +1636,6 @@ QUOTEMETA: Meta-characters that \Q should quote MULTI_CHAR_FOLD: multi-char strings that are folded to by a single character => UTF8 :safe -do regen/regcharclass_multi_char_folds.pl # 1 => All folds ®charclass_multi_char_folds::multi_char_folds(1) |