From f41044382e27f0991f49635bb31bab7bf3d1fb63 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Tue, 23 Jun 2015 15:46:10 +0200
Subject: [PATCH 1/1] screen: describe most flag classes

---
 screen.eng.inc.pl | 16 ++++++++--------
 screen.plp        |  2 +-
 2 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/screen.eng.inc.pl b/screen.eng.inc.pl
index fb9fbd3..e0cdb5c 100644
--- a/screen.eng.inc.pl
+++ b/screen.eng.inc.pl
@@ -66,14 +66,14 @@ mode => {
 },
 
 flag => {
-	g1 => ["info"],
-	g2 => ["display"],
-	g3 => ["select"],
-	g4 => ["config"],
-	g5 => ["window"],
-	g6 => ["buffer"],
-	g7 => ["contents"],
-	g9 => ["screen"],
+	g1 => ["info", "Temporarily hover information in bottom task bar."],
+	g2 => ["display", "Change screen display options."],
+	g3 => ["select", "Switch between existing windows."],
+	g4 => ["config", "Toggle configuration flags to change behaviour of the current window."],
+	g5 => ["window", "Operate on or in current window with lasting results."],
+	g6 => ["buffer", "..."],
+	g7 => ["contents", "Insert or read character contents on a screen."],
+	g9 => ["screen", "Manipulate global and inter-screen commands."],
 
 	arg => ["key<arg>" => "Commands with a dot need a char argument afterwards."],
 },
diff --git a/screen.plp b/screen.plp
index 26d6451..e5faf7d 100644
--- a/screen.plp
+++ b/screen.plp
@@ -34,7 +34,7 @@ $keys->print_rows($get{rows});
 <div class="help">
 	<div class="left">
 <:
-		$keys->print_legend('legend-types', [map { "g$_" } 1 .. 9]);
+		$keys->print_legend('legend-types', ['g1' .. 'g7', 'g9']);
 :>
 	</div>
 
-- 
2.30.0