From 44030736a34541a005ddc58629072dc4deaf3861 Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 22 Feb 2015 21:07:43 +0100
Subject: [PATCH] digraphs: verbose option to show inverted mnemonics

---
 digraphs.plp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/digraphs.plp b/digraphs.plp
index 2b3446b..72af1be 100644
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -32,6 +32,13 @@ are available as <a href="/digraphs.vim">ex commands</a>.</p>
 my $di = do 'digraphs.inc.pl'
 	or die "Error loading digraphs data: ", $@ // $!;
 
+if (exists $get{v}) {
+	# show characters for inverted mnemonics (vim alternatives)
+	$di->{ substr($_, 1, 1) . substr($_, 0, 1) } ||=
+		[$di->{$_}->[0], '', 'l0 ex']
+		for grep { ref $di->{$_} } keys %{$di};
+}
+
 my @chars = (
 	[qw{! " % ' ( ) * + , - . /}],
 	['0'..'9'], [qw{: ; < = > ?}],
-- 
2.30.0