[Anthy-dev 155] patch for uim-1815

Zurück zum Archiv-Index

yusuk****@cheru***** yusuk****@cheru*****
2003年 6月 20日 (金) 00:12:55 JST


田畑です。

たまにはuimのpatchをこのMLに説明付きで送ってみます。
SKKの候補一覧に送り仮名が出てこないのが直ります。

skk.scm中の候補取得要求のhandler内で送り仮名があれば、
それと候補をstring-appendして返しています。

変数okuriは(("あ" . "ア") ("い" . "イ") ...)のように平仮名と片仮名を
一つづつ組にしたもののリストなので、skk-make-stringで平仮名の方の
文字列を作っています。


--- /home/yusuke/work/uim/uim-1815/scm/skk.scm	2003-06-16 01:14:21.000000000 +0900
+++ uim-1815/scm/skk.scm	2003-06-19 23:46:15.000000000 +0900
@@ -707,8 +707,14 @@
 (define skk-get-candidate-handler
   (lambda (id idx)
     (let* ((c (find-context id))
-	   (sc (context-data c)))
-      (skk-get-nth-candidate sc idx))))
+	   (sc (context-data c))
+	   (cand (skk-get-nth-candidate sc idx))
+	   (okuri (skk-context-okuri sc)))
+      (if okuri
+	  (string-append cand
+			 (skk-make-string okuri t))
+	  cand))))
+
 
 (define skk-set-candidate-index-handler
   (lambda (id idx)
--
 CHAOS AND CHANCE!
  Yusuke TABATA (yusuk****@cheru*****)



Anthy-dev メーリングリストの案内
Zurück zum Archiv-Index