diff --git a/README.mediawiki b/README.mediawiki index b9006384..47d3822a 100644 --- a/README.mediawiki +++ b/README.mediawiki @@ -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 diff --git a/bip-0326.mediawiki b/bip-0326.mediawiki index dae64817..526ab5fa 100644 --- a/bip-0326.mediawiki +++ b/bip-0326.mediawiki @@ -1,8 +1,8 @@
BIP: 326 Layer: Applications - Title: Anti-fee-sniping protection with nSequence in taproot transactions to improve privacy for off-chain protocols - Author: Chris Belcher+ Title: Anti-fee-sniping in taproot transactions + Author: Chris Belcher Status: Draft Type: Informational Comments-Summary: No comments yet. diff --git a/scripts/buildtable.pl b/scripts/buildtable.pl index 0225632b..1edd8c0d 100755 --- a/scripts/buildtable.pl +++ b/scripts/buildtable.pl @@ -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)/ /g; $emails{$authorname}->{$authoremail} = undef;