Hiroyuki Komatsu
komat****@users*****
2005年 1月 16日 (日) 22:59:53 JST
Index: suikyo/elisp/src/suikyo.el diff -u suikyo/elisp/src/suikyo.el:1.3 suikyo/elisp/src/suikyo.el:1.4 --- suikyo/elisp/src/suikyo.el:1.3 Tue Jan 11 04:19:59 2005 +++ suikyo/elisp/src/suikyo.el Sun Jan 16 22:59:53 2005 @@ -1,5 +1,5 @@ ;;; suikyo.el --- Romaji-Hiragana conversion library for Emacs -;; $Id: suikyo.el,v 1.3 2005/01/10 19:19:59 komatsu Exp $ +;; $Id: suikyo.el,v 1.4 2005/01/16 13:59:53 komatsu Exp $ ;; ;; Copyright (C) 2002 Hiroyuki Komatsu <komat****@taiya*****> ;; All rights reserved. @@ -143,7 +143,7 @@ (setcar (cdr word-data) nil)) (let ((new-subtable (suikyo-table-unset (nth 2 word-data) rest))) (if new-subtable - (setcdr (cdr word-data) new-subtable) + (setcdr (cdr word-data) (list new-subtable)) (mell-list-delete word-data table)))) table))
