sekka.el in sekka-0.9.4

- old
+ new

@@ -272,11 +272,11 @@
 ;; 初期化
 ;;
 (defun sekka-init ()
   (when (not sekka-init)
     ;; 現在のsekka-serverの接続先
-    (defvar current-sekka-server-url  sekka-server-url) ;; 第一候補で初期化しておく。
+    (setq current-sekka-server-url  sekka-server-url) ;; 第一候補で初期化しておく。
 
     ;; ユーザー語彙のロード + サーバーへの登録
     (sekka-register-userdict-internal)
     
     ;; 初期化完了
@@ -1622,10 +1622,10 @@
 ;; input-method として登録する。
 (set-language-info "Japanese" 'input-method "japanese-sekka")
 (setq default-input-method "japanese-sekka")
 
 (defconst sekka-version
-  "0.9.3" ;;SEKKA-VERSION
+  "0.9.4" ;;SEKKA-VERSION
   )
 (defun sekka-version (&optional arg)
   "入力モード変更"
   (interactive "P")
   (message sekka-version))