mirror of
https://github.com/bitcoin/bips.git
synced 2024-11-19 01:40:05 +01:00
Bugfix: BIP 326: Correct Author/Title headings
This commit is contained in:
parent
31a496fc24
commit
66aed73043
@ -990,7 +990,7 @@ Those proposing changes should consider that ultimately consent may rest with th
|
||||
|-
|
||||
| [[bip-0326.mediawiki|326]]
|
||||
| Applications
|
||||
| Anti-fee-sniping protection with nSequence in taproot transactions to improve privacy for off-chain protocols
|
||||
| Anti-fee-sniping protection in taproot transactions
|
||||
| Chris Belcher
|
||||
| Informational
|
||||
| Draft
|
||||
|
@ -1,8 +1,8 @@
|
||||
<pre>
|
||||
BIP: 326
|
||||
Layer: Applications
|
||||
Title: Anti-fee-sniping protection with nSequence in taproot transactions to improve privacy for off-chain protocols
|
||||
Author: Chris Belcher <belcher at riseup dot net>
|
||||
Title: Anti-fee-sniping in taproot transactions
|
||||
Author: Chris Belcher <belcher@riseup.net>
|
||||
Status: Draft
|
||||
Type: Informational
|
||||
Comments-Summary: No comments yet.
|
||||
|
@ -89,7 +89,7 @@ my %DefinedLicenses = (
|
||||
);
|
||||
my %GrandfatheredPD = map { $_ => undef } qw(9 36 37 38 42 49 50 60 65 67 69 74 80 81 83 90 99 105 107 109 111 112 113 114 122 124 125 126 130 131 132 133 140 141 142 143 144 146 147 150 151 152);
|
||||
my %TolerateMissingLicense = map { $_ => undef } qw(1 10 11 12 13 14 15 16 21 31 33 34 35 39 43 44 45 47 61 64 68 70 71 72 73 101 102 106 120 121);
|
||||
my %TolerateTitleTooLong = map { $_ => undef } qw(39 44 45 47 49 60 67 68 69 73 74 75 80 81 99 105 106 109 113 122 126 131 143 145 147 173 326);
|
||||
my %TolerateTitleTooLong = map { $_ => undef } qw(39 44 45 47 49 60 67 68 69 73 74 75 80 81 99 105 106 109 113 122 126 131 143 145 147 173);
|
||||
|
||||
my %emails;
|
||||
|
||||
@ -127,10 +127,7 @@ while (++$bipnum <= $topbip) {
|
||||
my $title_len = length($title);
|
||||
die "$fn has too-long TItle ($title_len > 44 char max)" if $title_len > 44 and not exists $TolerateTitleTooLong{$bipnum};
|
||||
} elsif ($field eq 'Author') {
|
||||
my $deantispam = $val;
|
||||
$deantispam =~ s/ at /@/;
|
||||
$deantispam =~ s/ dot /./g;
|
||||
$deantispam =~ m/^(\S[^<@>]*\S) \<([^@>]*\@[\w.]+\.\w+)\>$/ or die "Malformed Author line in $fn";
|
||||
$val =~ m/^(\S[^<@>]*\S) \<([^@>]*\@[\w.]+\.\w+)\>$/ or die "Malformed Author line in $fn";
|
||||
my ($authorname, $authoremail) = ($1, $2);
|
||||
$authoremail =~ s/(?<=\D)$bipnum(?=\D)/<BIPNUM>/g;
|
||||
$emails{$authorname}->{$authoremail} = undef;
|
||||
|
Loading…
Reference in New Issue
Block a user