Commit539d387

committed

Fix missing regex slash that caused perltidy to get confused on

1 parent042d9ff commit539d387Copy full SHA for 539d387

File tree

-8

lines changed

-8

lines changed

Lines changed: 8 additions & 8 deletions

Original file line number	Diff line number	Diff line change
`@@ -37,16 +37,16 @@ sub wanted`
`37`	`37`
`38`	`38`	`# skip file names with binary extensions`
`39`	`39`	`# How are these updated? bjm 2012-01-02`
`40`		`-return`
`41`		`-if (`
`42`		`-$_ =~m/\.(ico\|bin)$);`
	`40`	`+returnif ($_ =~m/\.(ico\|bin)$/);`
`43`	`41`
`44`		`-my@lines;`
`45`		`-tie@lines, "Tie::File",$File::Find::name;`
	`42`	`+my@lines;`
	`43`	`+tie@lines,"Tie::File",$File::Find::name;`
`46`	`44`
`47`		`- foreach my$line (@lines) {`
`48`		`- # We only care about lines with a copyright notice.`
`49`		`- next unless$line =~ m/$cc . *$pgdg /;`
	`45`	`+foreachmy$line (@lines)`
	`46`	`+{`
	`47`	`+`
	`48`	`+# We only care about lines with a copyright notice.`
	`49`	`+nextunless$line =~m/$cc . *$pgdg/;`
`50`	`50`
`51`	`51`	`# We stop when we've done one substitution. This is both for`
`52`	`52`	`# efficiency and, at least in the case of this program, for`

Comments

(0)