summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2014-07-26 22:50:17 -0600
committerKarl Williamson <khw@cpan.org>2015-01-21 22:47:29 -0700
commitcafe9cf02cdf3ba071a336c9ce43f09530f13c62 (patch)
treede06dee916d9583e62823638ea41e584b92bdd4a
parent96f226dcd1c032e4aa63811b6c7dcd3377c58e60 (diff)
downloadperl-cafe9cf02cdf3ba071a336c9ce43f09530f13c62.tar.gz
mktables: White-space only
The previous commit added a block around this code
-rw-r--r--lib/unicore/mktables12
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index 6276d1ee4c..b7bf629972 100644
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -2514,12 +2514,12 @@ END
if ($v_version ge v3.2.0 && lc($file) ne 'unicodedata.txt') {
if ($file !~ /^Unihan/i) {
- $_ = <$file_handle>;
- if ($_ !~ / - $string_version \. /x) {
- chomp;
- $_ =~ s/^#\s*//;
- die Carp::my_carp("File '$file' is version '$_'. It should be version $string_version");
- }
+ $_ = <$file_handle>;
+ if ($_ !~ / - $string_version \. /x) {
+ chomp;
+ $_ =~ s/^#\s*//;
+ die Carp::my_carp("File '$file' is version '$_'. It should be version $string_version");
+ }
}
else {
while (<$file_handle>) {