fix minor bugs.

diff --git a/misc.dic b/misc.dic
index fb528bc..2d8115f 100644 (file)
--- a/misc.dic
+++ b/misc.dic
@@ -1,6 +1,6 @@
 #
 # misc.dic - \e$B2-Fl<-=q\e(B(\e$B$=$NB>\e(B)
-#              $Id: misc.dic,v 1.17 2002/06/11 08:13:14 ga2 Exp $
+#              $Id: misc.dic,v 1.18 2002/06/11 15:15:57 void Exp $
 #
 \e$B$-$e$&$h$&\e(B               \e$B5eM[\e(B                      \e$BIaDLL>;l\e(B
 \e$B$+$$$[$&\e(B         \e$B3$K.\e(B                      \e$BIaDLL>;l\e(B
@@ -481,9 +481,9 @@
 
 # --- \e$B8)N)IB1!\e(B ---------
 \e$B$[$/$V$S$g$&$$$s\e(B         \e$BKLItIB1!\e(B                  \e$BAH?%L>\e(B            # \e$BL>8n;TL>8n\e(B1609
-\e$B$A$e$&$V$S$g$&$$\e(Bn                \e$BCfItIB1!\e(B                  \e$BAH?%L>\e(B            # \e$B6q;V@n;T5\N$\e(B208-3
+\e$B$A$e$&$V$S$g$&$$$s\e(B               \e$BCfItIB1!\e(B                  \e$BAH?%L>\e(B            # \e$B6q;V@n;T5\N$\e(B208-3
 \e$B$J$O$S$g$&$$$s\e(B                   \e$BFaGFIB1!\e(B                  \e$BAH?%L>\e(B            # \e$BFaGF;TM?57\e(B1-3-1
-\e$B$J$s$V$S$g$&$$\e(Bn                  \e$BFnItIB1!\e(B                  \e$BAH?%L>\e(B            # \e$B;eK~;T??1IN$\e(B870
+\e$B$J$s$V$S$g$&$$$s\e(B         \e$BFnItIB1!\e(B                  \e$BAH?%L>\e(B            # \e$B;eK~;T??1IN$\e(B870
 \e$B$;$$$o$S$g$&$$$s\e(B         \e$B@:OBIB1!\e(B                  \e$BAH?%L>\e(B            # \e$BEg?,74FnIw86D.?7@n\e(B260
 \e$B$_$d$3$S$g$&$$$s\e(B         \e$B5\8EIB1!\e(B                  \e$BAH?%L>\e(B            # \e$BJ?NI;TElCg=!:,\e(B807
 \e$B$d$($d$^$S$g$&$$$s\e(B               \e$BH,=E;3IB1!\e(B                        \e$BAH?%L>\e(B            # \e$B@P3@;TBg@n\e(B732

diff --git a/script/oki2vje.pl b/script/oki2vje.pl
index e9033c4..6421ee0 100755 (executable)
--- a/script/oki2vje.pl
+++ b/script/oki2vje.pl
@@ -2,7 +2,7 @@
 #
 # oki2vje.pl - ²­Æì¼­½ñ¤Î¥Õ¥¡¥¤¥ë¤òVJE-Delta¤Ë»ý¤Ã¤Æ¹Ô¤¯¥Æ¥­¥¹¥È¤ËÊÑ´¹¤¹¤ë
 #
-#              $Id: oki2vje.pl,v 1.12 2002/06/10 20:19:46 void Exp $
+#              $Id: oki2vje.pl,v 1.13 2002/06/11 15:15:57 void Exp $
 #
 # ¤³¤Î¥¹¥¯¥ê¥×¥È¤ò»È¤Ã¤Æ¡¢°Ê²¼¤Î¤è¤¦¤Ë¡Öokinawa.txt¡×¤òÀ¸À®¤·¤Æ¤ª¤¤¤Æ¡¢
 #     $ nkf -e *.dic | ./oki2vje.pl | sort -u | nkf -s > okinawa.txt
@@ -45,7 +45,7 @@ sub convert_class {
                print "$phonate\t$word\t¡ÎÃÏ̾¡Ï\n";
        }
        elsif ($class eq "ÀÜÈø¸ìÉÕ¤­ÃÏ̾") {
-               print "$phonate\t$word\t¡ÎÃÏ̾¡Ï\n";
+               print "$phonate\t$word\t¡ÎÃÏ̾¹ÔÀ¯¶èʬ¡Ï\n";
        }
        elsif ($class eq "ÁÈ¿¥Ì¾") {
                print "$phonate\t$word\t¡ÎÁÈ¿¥¡Ï\n";
@@ -72,25 +72,25 @@ sub convert_class {
                print "$phonate\t$word\t¡ÎÀÜƬ¡Ï\n";
        }
        elsif ($class eq "¿ô»úÎóÀÜƬ¸ì") {
-               print "$phonate\t$word\t¡ÎÀÜƬ¡Ï\n";
+               print "$phonate\t$word\t¡Î´§¿ô¡Ï\n";
        }
        elsif ($class eq "ÀÜÈø¸ì") {
                print "$phonate\t$word\t¡ÎÀÜÈø¡Ï\n";
        }
        elsif ($class eq "¿Í̾ÀÜÈø¸ì") {
-               print "$phonate\t$word\t¡ÎÀÜÈø¡Ï\n";
+               print "$phonate\t$word\t¡ÎÀÜÈø¿Í̾¡Ï\n";
        }
        elsif ($class eq "ÃÏ̾ÀÜÈø¸ì") {
-               print "$phonate\t$word\t¡ÎÀÜÈø¡Ï\n";
+               print "$phonate\t$word\t¡ÎÀÜÈøÃÏ̾¡Ï\n";
        }
        elsif ($class eq "ÁÈ¿¥Ì¾ÀÜÈø¸ì") {
                print "$phonate\t$word\t¡ÎÀÜÈø¡Ï\n";
        }
        elsif ($class eq "¿ô»úÎóÀÜÈø¸ì") {
-               print "$phonate\t$word\t¡ÎÀÜÈø¡Ï\n";
+               print "$phonate\t$word\t¡Î½õ¿ô¡Ï\n";
        }
        elsif ($class eq "À®¶ç") {
-               print "$phonate\t$word\t¡Îñ´Á¡Ï\n";
+               print "$phonate\t$word\t¡Î̾»ì¡Ï\n";
        }
        elsif ($class eq "̵ÉÊ»ì") {
                print "$phonate\t$word\t¡Îñ´Á¡Ï\n";