* riece-addon.el (riece-uninstall-addon): Don't check the add-on

[riece] / lisp / riece-kakasi.el

diff --git a/lisp/riece-kakasi.el b/lisp/riece-kakasi.el
index 0df4d69..fd018c7 100644 (file)
--- a/lisp/riece-kakasi.el
+++ b/lisp/riece-kakasi.el
@@ -28,8 +28,6 @@
 
 ;;; Code:
 
-(defvar riece-kakasi-enabled nil)
-
 (defconst riece-kakasi-description
   "Convert Japanese to roman string by KAKASI.")
 
@@ -49,7 +47,7 @@
       (delete-region (point-min) (point)))))
 
 (defun riece-kakasi-message-filter (message)
-  (if riece-kakasi-enabled
+  (if (get 'riece-kakasi 'riece-addon-enabled)
       (riece-message-set-text message
                              (riece-kakasi-convert-string
                               (riece-message-text message))))
@@ -67,12 +65,10 @@
                       "kakasi" "-Ha" "-Ka" "-Ja" "-Ea" "-ka"))
   (with-current-buffer (process-buffer riece-kakasi-process)
     (buffer-disable-undo)
-    (erase-buffer))
-  (setq riece-kakasi-enabled t))
+    (erase-buffer)))
 
 (defun riece-kakasi-disable ()
-  (kill-buffer (process-buffer riece-kakasi-process))
-  (setq riece-kakasi-enabled nil))
+  (kill-buffer (process-buffer riece-kakasi-process)))
 
 (provide 'riece-kakasi)