be a little more forgiving about format
authoraland <aland>
Fri, 16 Mar 2007 10:03:38 +0000 (10:03 +0000)
committeraland <aland>
Fri, 16 Mar 2007 10:03:38 +0000 (10:03 +0000)
share/format.pl

index 0c816a0..7228a65 100755 (executable)
@@ -71,6 +71,12 @@ while (@ARGV) {
        #
        if (/^BEGIN-VENDOR\s+([\w-]+)/) {
            $begin_vendor = 1;
+           if (!defined $vendor) {
+               $vendor = $1;
+           } elsif ($vendor ne $1) {
+               # do something smart
+           }
+
            push @output, "BEGIN-VENDOR\t$vendor\n";
            next;
        }