* Regen HTML.

g0v · Apr 2, 2015 · ceac47e · ceac47e
1 parent 0a966e3
commit ceac47e
Show file tree

Hide file tree

Showing 4 changed files with 17 additions and 1 deletion.
diff --git a/Makefile b/Makefile
@@ -0,0 +1,3 @@
+gen ::
+	perl gen.pl | sh
+	jade -P jade --out html
diff --git a/font/jade-unescape.pl b/font/jade-unescape.pl
@@ -26,7 +26,7 @@ sub k {
     my $str = shift;
     $str =~ s!&#xFc6a([1-9]);!chr(0x245f + $1)!eg;
     $str =~ s!&#xF([89af]...);!
-        $k->{$1} ? qq[<rt>$k->{$1}</rt>] : qq[<mark>&#xF$1</mark>]
+        $k->{$1} ? qq[<rt>$k->{$1}</rt>] : qq[<mark>&#xF$1;</mark>]
     !eg;
     $str =~ s!&#xF([^89af]...);!
         $k->{$1} ? qq[<rt>$k->{$1}</rt>] : qq[<img src="img/k/$1.png">]

diff --git a/gen.pl b/gen.pl
@@ -0,0 +1,6 @@
+use 5.12.0;
+for ('01'..'26') {
+    my ($dic) = glob("*$_*.dic");
+    say "perl a-tsioh_sandbox/recode_utf8.pl $dic | python a-tsioh_sandbox/dic2jade.py | perl font/jade-unescape.pl > jade/$_.jade"
+}
+
diff --git a/html/style.css b/html/style.css
@@ -37,3 +37,10 @@ img {
     height: 24px;
     border: 1px solid red;
 }
+@font-face {
+    font-family: 'k';
+    src: url('./font/koktai-k.woff') format('woff');
+}
+mark {
+    font-family: 'k';
+}