Add the pseudo-protocol `lang', which generates a

span with a `lang=` attribute.

generate.c

@@ -468,9 +468,10 @@ static linkytype linkt  = { 0, 0, "<a href=\"", "\"",
  */
 static linkytype specials[] = {
     { "id:", 3, "<a id=\"", "\"", 0, ">", "</a>", 0, IS_URL },
-    { "class:", 6, "<span class=\"", "\"", 0, ">", "</span>", 0, 0 },
     { "raw:", 4, 0, 0, 0, 0, 0, DENY_HTML, 0 },
+    { "lang:", 5, "<span lang=\"", "\"", 0, ">", "</span>", 0, 0 },
     { "abbr:", 5, "<abbr title=\"", "\"", 0, ">", "</abbr>", 0, 0 },
+    { "class:", 6, "<span class=\"", "\"", 0, ">", "</span>", 0, 0 },
 } ;
 
 #define NR(x)	(sizeof x / sizeof x[0])

tests/pseudo.t

@@ -9,6 +9,8 @@ try '[](id:) links' '[foo](id:bar)' '<p><a id="bar">foo</a></p>'
 try -fnoext  '[](id:) links with -fnoext' '[foo](id:bar)' '<p>[foo](id:bar)</p>'
 try '[](class:) links' '[foo](class:bar)' '<p><span class="bar">foo</span></p>'
 try -fnoext '[](class:) links with -fnoext' '[foo](class:bar)' '<p>[foo](class:bar)</p>'
+try '[](lang:) links' '[foo](lang:en)' '<p><span lang="en">foo</span></p>'
+try -fnoext '[](lang:) links with -fnoext' '[foo](lang:en)' '<p>[foo](lang:en)</p>'
 try '[](raw:) links' '[foo](raw:bar)' '<p>bar</p>'
 try -fnoext '[](raw:) links with -fnoext' '[foo](raw:bar)' '<p>[foo](raw:bar)</p>'