diff options
author | Alvaro Herrera | 2022-09-08 09:16:09 +0000 |
---|---|---|
committer | Alvaro Herrera | 2022-09-08 09:20:29 +0000 |
commit | 12d40d4a8d0495cf2c7b564daa8aaa7f107a6c56 (patch) | |
tree | c221b6227f17d21894b86fa308651f5079350db9 /src | |
parent | cb62d0b3c372350b997733f41283cc35a6814024 (diff) |
Fix perltidy breaking perlcritic
perltidying a "##no critic" line moves the marker to where it becomes
useless. Put the line back to how it was, and protect it from further
malfeasance.
Per buildfarm member crake.
Diffstat (limited to 'src')
-rw-r--r-- | src/backend/catalog/Catalog.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/backend/catalog/Catalog.pm b/src/backend/catalog/Catalog.pm index 4a9fa3b2cbd..1546e1b3350 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"; |