From 10a85aea004484aae7e07f09235c75e90615787b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Fri, 13 Nov 2020 01:48:57 +0100
Subject: fix error in weak match warning

---
 rf | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/rf b/rf
index 5822447..338409d 100755
--- a/rf
+++ b/rf
@@ -109,10 +109,10 @@ for (my $i = $#lines; $i >= 0; $i--) {
 		if ($points[$winner] < 150) {
 			my $f = fmt("%a, %y", $winner);
 			print STDERR "Warning: Guessing that reference '$rest' refers to $f; ";
-			if ($points[$winner] > 100) {
+			if ($points[$winner] >= 100) {
+				print STDERR "only author matches.\n";
+			} elsif ($points[$winner] >= 50) {
 				print STDERR "only date matches.\n";
-			} elsif ($points[$winner] > 50) {
-				print STDERR "only date and title matches.\n";
 			} else {
 				print STDERR "only title matches (level = $points[$winner]).\n";
 			}
-- 
cgit v1.2.3