digraphs: preserve string representations in verbose inversions

[sheet.git] / digraphs.plp

diff --git a/digraphs.plp b/digraphs.plp
index 72af1bee70461fcf10fcf873ba974fae278e65b4..54097cb0bd788228c22ed223602bb8bb1e3119d3 100644 (file)
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -35,7 +35,7 @@ my $di = do 'digraphs.inc.pl'
 if (exists $get{v}) {
        # show characters for inverted mnemonics (vim alternatives)
        $di->{ substr($_, 1, 1) . substr($_, 0, 1) } ||=
-               [$di->{$_}->[0], '', 'l0 ex']
+               [ $di->{$_}->[0], '', 'l0 ex', '', $di->{$_}->[4] ]
                for grep { ref $di->{$_} } keys %{$di};
 }