sekka.el in sekka-1.5.9

- old
+ new

@@ -1,11 +1,11 @@
 ;;; sekka.el --- A client for Sekka IME server
 ;;
 ;; Copyright (C) 2010-2014 Kiyoka Nishiyama
 ;;
 ;; Author: Kiyoka Nishiyama <kiyoka@sumibi.org>
-;; Version: 1.5.8          ;;SEKKA-VERSION
+;; Version: 1.5.9          ;;SEKKA-VERSION
 ;; Keywords: ime, skk, japanese
 ;; Package-Requires: ((cl-lib "0.3") (concurrent "0.3.1") (popup "0.5.0"))
 ;; URL: https://github.com/kiyoka/sekka
 ;;
 ;; This file is part of Sekka
@@ -81,11 +81,11 @@
   "*漢字変換文字列を取り込む時に変換範囲に含めない文字を設定する"
   :type  'string
   :group 'sekka)
 
 (defcustom sekka-use-curl t
-  "non-nil でcurlコマンドを使う。nilでEmacs Lisp(url.elを使う)"
+  "non-nil でcurlコマンドを優先して使う。nilで変換動作だけEmacs Lisp(url.el)を使う"
   :type  'boolean
   :group 'sekka)
 
 (defcustom sekka-curl "curl"
   "curlコマンドの絶対パスを設定する"
@@ -523,11 +523,13 @@
     ;; 実際のサーバに接続する
     (cond
      (sekka-use-curl
       (sekka-rest-request-by-curl func-name arg-alist))
      (t
-      (sekka-rest-request-by-pure func-name arg-alist)))))
+      (if (string-equal "register" func-name)
+          (sekka-rest-request-by-curl func-name arg-alist) ;; 辞書登録はcurlを使ってバックグラウンドで実行する。pure版は平行動作できない。
+        (sekka-rest-request-by-pure func-name arg-alist))))))
 
 ;;
 ;; 現在時刻をUNIXタイムを返す(単位は秒)
 ;;
 (defun sekka-current-unixtime ()
@@ -1742,10 +1744,10 @@
 ;; input-method として登録する。
 (set-language-info "Japanese" 'input-method "japanese-sekka")
 (setq default-input-method "japanese-sekka")
 
 (defconst sekka-version
-  "1.5.8" ;;SEKKA-VERSION
+  "1.5.9" ;;SEKKA-VERSION
   )
 (defun sekka-version (&optional arg)
   "入力モード変更"
   (interactive "P")
   (message sekka-version))