patch-20010524.gz in [tamago:00462] is applied.

[elisp/tamago.git] / egg / canna.el

diff --git a/egg/canna.el b/egg/canna.el
index d6ab041..205ff17 100644 (file)
--- a/egg/canna.el
+++ b/egg/canna.el
@@ -645,7 +645,7 @@ Return the list of bunsetsu."
   (if (y-or-n-p (concat "\e$B!V\e(B" kanji "\e$B$J!W$O@5$7$$$G$9$+!#\e(B")) "#T15" "#T35"))
 
 (defun canna-hinshi-SAHEN-MEISHI (kanji yomi)
-  (if (y-or-n-p (concat "\e$B!V\e(B" kanji "\e$B$J!W$O@5$7$$$G$9$+!#\e(B") "#T10" "#T30")))
+  (if (y-or-n-p (concat "\e$B!V\e(B" kanji "\e$B$J!W$O@5$7$$$G$9$+!#\e(B")) "#T10" "#T30"))
 
 (defmacro canna-hinshi-DOUSHI-check-gobi ()
   '(progn
@@ -875,7 +875,7 @@ Return the list of bunsetsu."
          (cannarpc-close-context envd)
          (list kanji yomi (canna-hinshi-name hinshi) dic))
       (cannarpc-close-context envd)
-      (egg-error (cannarpc-get-error-message (- result))))
+      (egg-error "\e$B:o=|$5$l$^$;$s$G$7$?!#\e(B"))
     ))
 
 ;;; setup