X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/3d85617a93a26670c13f346c1432a6f417e2e603..9ddf2e9a6173fcb1649ab9dd72ded3896195c83f:/writer.plp?ds=inline

diff --git a/writer.plp b/writer.plp
index 05e1465..256a074 100644
--- a/writer.plp
+++ b/writer.plp
@@ -71,6 +71,7 @@ my %lang = (
 	en => ["\N{REGIONAL INDICATOR SYMBOL LETTER G}\N{REGIONAL INDICATOR SYMBOL LETTER B}", 'english'],
 	eo => ['<span style="color:green">★</span>', 'esperanto'],
 	ru => ["\N{REGIONAL INDICATOR SYMBOL LETTER R}\N{REGIONAL INDICATOR SYMBOL LETTER U}", 'русский'],
+	la => ["\N{PUSHPIN}", 'latin'],
 );
 my @wordcols = pairkeys
 my %wordcol = (
@@ -172,6 +173,7 @@ elsif (defined $post{form}) {{
 				prio  => undef,
 			);
 			$subrow{wptitle} = $1 if $subrow{form} =~ s/\h*\[(.*)\]$//; # [Link] shorthand
+			$subrow{alt} = [split m{/}, $1] if $subrow{form} =~ s{/(\S.*)}{}; # /alternates shorthand
 			$db->insert(word => \%subrow);
 			delete $fields{$field};
 		}