X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/a276fd5a3ff11c8f203b1c6bb5c663f11894e41d..4e1baf7dd0bd8b9f632a5ca00377b5136c1890c8:/Shiar_Sheet/Keyboard.pm

diff --git a/Shiar_Sheet/Keyboard.pm b/Shiar_Sheet/Keyboard.pm
index 98c5a40..c627d6d 100644
--- a/Shiar_Sheet/Keyboard.pm
+++ b/Shiar_Sheet/Keyboard.pm
@@ -130,6 +130,8 @@ sub print_key {
 		' onclick="setmode(%s)"',
 		$1 eq '' ? '' : sprintf(q{'mode%s'}, escapeclass($1))
 	);
+	$flags =~ s/\bx\w+/ext/;
+	$flags =~ s/\bv\d+/new/;
 	$flags .= ' chr'.ord(substr $key, -1) if $key ne '^0';
 
 	print qq{\t\t<td class="$flags"$onclick>$keytxt};