diff options
| author | Luke Dashjr <luke-jr+git@utopios.org> | 2017-10-29 04:04:07 +0000 |
|---|---|---|
| committer | Luke Dashjr <luke-jr+git@utopios.org> | 2017-10-29 04:04:07 +0000 |
| commit | 41cabd2de5eeaf6b905d7464d18ab16c21774a68 (patch) | |
| tree | 574e6eeec73f4c9e2fd1bbe8b0d6f0d6ab7a798e /scripts | |
| parent | 21da438ad50ad9fb0bb46fb4ae4a1bf6addb16af (diff) | |
scripts/buildtable: Support License-Code header
Diffstat (limited to 'scripts')
| -rwxr-xr-x | scripts/buildtable.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/scripts/buildtable.pl b/scripts/buildtable.pl index 36701a5..144ede6 100755 --- a/scripts/buildtable.pl +++ b/scripts/buildtable.pl @@ -19,6 +19,7 @@ my %MayHaveMulti = ( Author => undef, 'Comments-URI' => undef, License => undef, + 'License-Code' => undef, 'Post-History' => undef, ); my %DateField = ( @@ -149,9 +150,9 @@ while (++$bipnum <= $topbip) { } elsif ($field eq 'Layer') { # BIP 123 die "Invalid layer $val in $fn" unless exists $ValidLayer{$val}; $layer = $val; - } elsif ($field eq 'License') { + } elsif ($field =~ /^License(?:\-Code)?$/) { die "Undefined license $val in $fn" unless exists $DefinedLicenses{$val}; - if (not $found{License}) { + if (not $found{$field}) { die "Unacceptable license $val in $fn" unless exists $AcceptableLicenses{$val} or ($val eq 'PD' and exists $GrandfatheredPD{$bipnum}); } } elsif ($field eq 'Comments-URI') { |