diff --git a/src/backend/catalog/Catalog.pm b/src/backend/catalog/Catalog.pm index 4a9fa3b2cb..1546e1b335 100644 --- a/src/backend/catalog/Catalog.pm +++ b/src/backend/catalog/Catalog.pm @@ -315,8 +315,10 @@ sub ParseData # We're treating the input line as a piece of Perl, so we # need to use string eval here. Tell perlcritic we know what # we're doing. - eval '$hash_ref = ' - . $_; ## no critic (ProhibitStringyEval) + #<<< protect next line from perltidy + # so perlcritic annotation works + eval '$hash_ref = ' . $_; ## no critic (ProhibitStringyEval) + #>>> if (!ref $hash_ref) { die "$input_file: error parsing line $.:\n$_\n";