writing: indicate writing system for asl (l)anguage
authorMischa POSLAWSKY <perl@shiar.org>
Mon, 21 Sep 2015 16:24:10 +0000 (18:24 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 21 Sep 2015 22:20:08 +0000 (00:20 +0200)
writing-latn.inc.pl

index 6c0edad04f1d9589d968fa3c28b90cde0f640bf1..ef14053cefdb18350422984041db006c7f376284 100644 (file)
@@ -16,7 +16,7 @@ my %C = qw(red #EC1C24  blue #3953A3  yellow #F9EC31  black #231F20);
 'Uppercase' => [qw{ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z }],
 'Lowercase' => [qw{ a b c d e f g h i j k l m n o p q r s t u v w x y z }],
 'Sütterlin' => [qw{ a b c d e f g h i j k l m n o p q r ſ s t u v w x y z }],
-'<abbr title="American Sign Lanugage">ASL</abbr>' => [
+'Sutton <abbr title="American Sign Lanugage">ASL</abbr>' => [
        # American manual alphabet in Sutton (U+1D800+) notation
        map { pack 'W*', map { hex "1D$_" } unpack '(A3)*', $_ } qw{
        8F7a9c    847a9c    86Da9c    801a9c    84Aa9c