]> granicus.if.org Git - postgresql/commitdiff
Fix missing regex slash that caused perltidy to get confused on
authorBruce Momjian <bruce@momjian.us>
Thu, 5 Jul 2012 01:58:48 +0000 (21:58 -0400)
committerBruce Momjian <bruce@momjian.us>
Thu, 5 Jul 2012 01:58:48 +0000 (21:58 -0400)
copyright.pl.

Backpatch to 9.2.

src/tools/copyright.pl

index 2ef35d252567518545c9cb6a7a50c5fe822681a7..a55228d6ec886b45c2c41053151959c19db46410 100755 (executable)
@@ -37,16 +37,16 @@ sub wanted
 
        # skip file names with binary extensions
        # How are these updated?  bjm 2012-01-02
-       return
-         if (
-               $_ =~ m/\.(ico|bin)$);
+       return if ($_ =~ m/\.(ico|bin)$/);
 
-    my @lines;
-    tie @lines, "Tie::File", $File::Find::name;
+       my @lines;
+       tie @lines, "Tie::File", $File::Find::name;
 
-    foreach my $line (@lines) {
-        # We only care about lines with a copyright notice.
-        next unless $line =~ m/$cc . *$pgdg /;
+       foreach my $line (@lines)
+       {
+
+               # We only care about lines with a copyright notice.
+               next unless $line =~ m/$cc . *$pgdg /;
 
                # We stop when we've done one substitution.  This is both for
                # efficiency and, at least in the case of this program, for