Commit22411cc

committed

Fix failure with perlcritic in psql's create_help.pl

No buildfarm members have reported that yet, but a recently-refreshedDebian host did.Reviewed-by: Andrew DunstanDiscussion:https://postgr.es/m/Y8ey5z4Nav62g4/K@paquier.xyzBackpatch-through: 11

1 parent58393ea commit22411ccCopy full SHA for 22411cc

File tree

-3

lines changed

-3

lines changed

Lines changed: 3 additions & 3 deletions

Original file line number	Diff line number	Diff line change
`@@ -40,7 +40,7 @@`
`40`	`40`	`$define =~tr/a-z/A-Z/;`
`41`	`41`	`$define =~s/\W/_/g;`
`42`	`42`
`43`		`-opendir(DIR,$docdir)`
	`43`	`+opendir(my$dh,$docdir)`
`44`	`44`	`ordie"$0: could not open documentation source dir '$docdir':$!\n";`
`45`	`45`	`open(my$hfile_handle,'>',$hfile)`
`46`	`46`	`ordie"$0: could not open output file '$hfile':$!\n";`
`@@ -91,7 +91,7 @@`
`91`	`91`
`92`	`92`	`my%entries;`
`93`	`93`
`94`		`-foreachmy$file (sortreaddirDIR)`
	`94`	`+foreachmy$file (sortreaddir$dh)`
`95`	`95`	`{`
`96`	`96`	`my ($cmdid,@cmdnames,$cmddesc,$cmdsynopsis);`
`97`	`97`	`$file =~/\.sgml$/ornext;`
`@@ -214,4 +214,4 @@`
`214`	`214`
`215`	`215`	`close$cfile_handle;`
`216`	`216`	`close$hfile_handle;`
`217`		`-closedirDIR;`
	`217`	`+closedir$dh;`

Comments

(0)