diff options
| author | June McEnroe <june@causal.agency> | 2020-12-20 22:30:44 -0500 |
|---|---|---|
| committer | June McEnroe <june@causal.agency> | 2020-12-20 22:30:44 -0500 |
| commit | 1c9899ed0e3b652478c3a56d8a6832e11b9dc949 (patch) | |
| tree | 1ad1ccb963e3a6ff0abe18c2915cf2585cdfa2a2 | |
| parent | Depend on rfc-index.txt.gz in Makefile (diff) | |
| download | src-1c9899ed0e3b652478c3a56d8a6832e11b9dc949.tar.gz src-1c9899ed0e3b652478c3a56d8a6832e11b9dc949.zip | |
Emit tags for section headings without trailing dots
Some RFCs reference other sections like "(Section 1.2)", where the section header says "1.2.".
| -rw-r--r-- | rfc/rfctags.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rfc/rfctags.pl b/rfc/rfctags.pl index 5833e17a..01324a0d 100644 --- a/rfc/rfctags.pl +++ b/rfc/rfctags.pl @@ -15,6 +15,7 @@ for my $rfc (<*.txt.gz>) { if (/^([\d.]+|[A-Z][.])\s+([^\t]+)?/) { print $1, $rfc, $.; print $2, $rfc, $. if $2; + print $1, $rfc, $. if $1 =~ /^([\d.]+)[.]$/; } # References if (/^\s*(\[[\w-]+\])\s{2,}/) { |