From 8a2925df824c494773c95f50bd3c0fcf2c12868a Mon Sep 17 00:00:00 2001
From: "C. McEnroe" <june@causal.agency>
Date: Tue, 16 Feb 2021 20:03:35 -0500
Subject: Add missing %U for RFCs in bibsort

---
 bin/bibsort.pl | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'bin/bibsort.pl')

diff --git a/bin/bibsort.pl b/bin/bibsort.pl
index f87f066f..89133c87 100644
--- a/bin/bibsort.pl
+++ b/bin/bibsort.pl
@@ -32,11 +32,13 @@ sub byLast {
 foreach $ref (@refs) {
 	@{$ref->{A}} = sort byLast @{$ref->{A}};
 	@{$ref->{Q}} = sort @{$ref->{Q}} if $ref->{Q};
-	next unless $ref->{N};
-	if ($ref->{N}[0] =~ /RFC/) {
+	if ($ref->{N} && $ref->{N}[0] =~ /RFC/) {
 		$ref->{R} = $ref->{N};
 		delete $ref->{N};
 	}
+	if ($ref->{R} && $ref->{R}[0] =~ /RFC (\d+)/ && !$ref->{U}) {
+		$ref->{U} = ["https://tools.ietf.org/html/rfc${1}"];
+	}
 }
 
 sub byAuthor {
-- 
cgit 1.4.1