From 41ffdd8c7e534f484eb8e8e825cb9bc2dee8719e Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Sat, 27 Mar 2010 21:16:11 +0100
Subject: [PATCH] mop: mo-score knows how to abbreviate single-word status
 lines

---
 mop/eval/mo-score.sh | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/mop/eval/mo-score.sh b/mop/eval/mo-score.sh
index 9d0a200..d651f18 100755
--- a/mop/eval/mo-score.sh
+++ b/mop/eval/mo-score.sh
@@ -82,6 +82,8 @@ foreach $u (keys %users) {
 				elsif ($trem =~ /^Caught fatal signal /) { $cmt = "SG"; }
 				elsif ($trem =~ /^([A-Za-z])\S*\s+([A-Za-z])/) {
 					($cmt = "$1$2") =~ tr/a-z/A-Z/;
+				} elsif ($trem =~ /^([A-Za-z]{2})/) {
+					($cmt = $1) =~ tr/a-z/A-Z/;
 				}
 				if (!defined $messages{$trem}) {
 					$messages{$trem} = $cmt;
-- 
2.39.2