sekka 1.1.0.pre → 1.1.1.pre

data/VERSION.yml

@@ -1,4 +1,4 @@
 ---
 :major: 1
 :minor: 1
-:patch: 0
+:patch: 1

data/emacs/sekka.el

@@ -1620,7 +1620,7 @@ point から行頭方向に同種の文字列が続く間を漢字変換しま
 (setq default-input-method "japanese-sekka")
 
 (defconst sekka-version
-  "1.1.0" ;;SEKKA-VERSION
+  "1.1.1" ;;SEKKA-VERSION
   )
 (defun sekka-version (&optional arg)
   "入力モード変更"

data/lib/sekka/convert-jisyo.nnd

@@ -108,6 +108,10 @@
        ((rxmatch #/\;\;/ line)
         ;; フォーマットエラー
         #f)
+       ((and (is-hiragana (first fields))
+             (= 1 (length fields)))
+        ;; 平仮名フレーズ
+        (expand-hiragana-phrase-entry (first fields)))
        ((and (is-hiragana (first fields))
              (rxmatch #/^\/$/ (second fields)))
         ;; 平仮名フレーズ
@@ -128,6 +132,12 @@
        ((rxmatch #/[#]+/ (first fields))
         ;; # が1文字でも含まれている
         #f)
+       ((rxmatch #/^[ ]*$/ (first fields) )
+        ;; 空文字列
+        #f)
+       ((= 1 (length fields))
+        ;; フィールドが1件しかない。
+        #f)
        (else
         (list (cons (first fields) (second fields)))))))
 

data/lib/sekka/henkan.nnd

@@ -509,10 +509,8 @@
     #?=(+ "already stored userid=[" userid "] tango=[" dict-line "]")
     #f)
    (else
-    (cond
-     ((rxmatch #/[ ]+[\/]/ dict-line)
-      (let1 lst (convert-skk-jisyo-f (StringIO.new (+ dict-line "\n")))
-        (if (null? lst)
+    (let1 lst (convert-skk-jisyo-f (StringIO.new (+ dict-line "\n")))
+      (if (null? lst)
             (begin
               #?=(+ "Error user dict format error userid=[" userid "] tango=[" dict-line "]")
               #f)
@@ -521,10 +519,7 @@
               (setup-trie-index userid kvs user-keylist #f)
               (kvs-push! userid kvs dict-line)
               #?=(+ "user dict stored userid=[" userid "] tango=[" dict-line "]")
-              #t))))
-     (else
-      #?=(+ "Error user dict format error userid=[" userid "] tango=[" dict-line "]")
-      #f)))))
+              #t))))))
 ;; Export to Ruby world
 (export-to-ruby registerUserJisyo)
 

data/lib/sekka/jisyo-db.nnd

@@ -188,7 +188,7 @@
     (kvs.clear)
     (create-keylist kvs f)
     (setup-trie-index master-prefix kvs keylist #t)
-    (kvs.put! version-prefix SekkaVersion.version)
+    (kvs.put! version-prefix SekkaVersion.dictVersion)
     (kvs.close)))
 
 

data/lib/sekka/sekkaversion.rb

@@ -1,4 +1,4 @@
 class SekkaVersion
-  def  self.version()     "1.1.0"  end
+  def  self.version()     "1.1.1"  end
   def  self.dictVersion() "1.2.0"  end
 end

data/lib/sekka/util.nnd

@@ -55,6 +55,7 @@
   (if-let1 index (line.index #/[ ]+/)
     (list (car (to-list (line.split #/[ ]+/)))
           (. (line.slice index (line.size)) strip))
-    #f))
+    (list line)))
+
 
 

data/test/henkan-main.nnd

@@ -190,6 +190,7 @@
    (#t  ,userid "あいうえおか       //")   ;; 平仮名フレーズ
    (#t  ,userid "あいうえおかき      //")  ;; 平仮名フレーズ
    (#t  ,userid "なっている          //")  ;; 平仮名フレーズ
+   (#t  ,userid "しています")              ;; 平仮名フレーズ
    ))
 
 
@@ -265,7 +266,9 @@
        "n$ q$"
        (kvs.get "Ik::MASTER::henka"))
 
-
+(test* "db fetch 18"
+       "しています"
+       (kvs.get "dummy::=siteimasu"))
 
 ;;-------------------------------------------------------------------
 (test-section "Replace user dict entry")

data/test/jisyo.nnd

@@ -102,10 +102,11 @@
                  "? /？/"
                  "こーひー /コーヒー/"
                  "しました //"
+                 "しています"
                  )
                "\n"))
   (test* "convert SKK file to SEKKA jisyo file. (1)"
-         '("shiroI Cしろi" "siroI Cしろi" "xiroI Cしろi" "しろi /白" "ai Cあい" "あい /愛/哀/相/挨" "Greek /Α/Β/Γ/Δ/Ε/Ζ/Η/Θ/Ι/Κ/Λ/Μ/Ν/Ξ/Ο/Π/Ρ/Σ/Τ/Υ/Φ/Χ/Ψ/Ω" ">an C>あん" ">ann C>あん" ">aq C>あん" ">あん /案" ">yasuI C>やすi" ">やすi /易" "! /！/感嘆符" "? /？" "ko'hi' Cこーひー" "ko'hi- Cこーひー" "ko'hi: Cこーひー" "ko'hi^ Cこーひー" "ko-hi' Cこーひー" "ko-hi- Cこーひー" "ko-hi: Cこーひー" "ko-hi^ Cこーひー" "ko:hi' Cこーひー" "ko:hi- Cこーひー" "ko:hi: Cこーひー" "ko:hi^ Cこーひー" "ko^hi' Cこーひー" "ko^hi- Cこーひー" "ko^hi: Cこーひー" "ko^hi^ Cこーひー" "こーひー /コーヒー" "=shimashita しました" "=shimasita しました" "=shimast しました" "=simashita しました" "=simasita しました" "=simast しました" "=ximast しました")
+         '("shiroI Cしろi" "siroI Cしろi" "xiroI Cしろi" "しろi /白" "ai Cあい" "あい /愛/哀/相/挨" "Greek /Α/Β/Γ/Δ/Ε/Ζ/Η/Θ/Ι/Κ/Λ/Μ/Ν/Ξ/Ο/Π/Ρ/Σ/Τ/Υ/Φ/Χ/Ψ/Ω" ">an C>あん" ">ann C>あん" ">aq C>あん" ">あん /案" ">yasuI C>やすi" ">やすi /易" "! /！/感嘆符" "? /？" "ko'hi' Cこーひー" "ko'hi- Cこーひー" "ko'hi: Cこーひー" "ko'hi^ Cこーひー" "ko-hi' Cこーひー" "ko-hi- Cこーひー" "ko-hi: Cこーひー" "ko-hi^ Cこーひー" "ko:hi' Cこーひー" "ko:hi- Cこーひー" "ko:hi: Cこーひー" "ko:hi^ Cこーひー" "ko^hi' Cこーひー" "ko^hi- Cこーひー" "ko^hi: Cこーひー" "ko^hi^ Cこーひー" "こーひー /コーヒー" "=shimashita しました" "=shimasita しました" "=shimast しました" "=simashita しました" "=simasita しました" "=simast しました" "=ximast しました" "=shiteimasu しています" "=shitwms しています" "=siteimasu しています" "=sitwms しています" "=xitwms しています")
          (convert-skk-jisyo-f _input)))
 
 ;;===================================================================

data/test/sekka-dump-out-1.txt

@@ -1335,4 +1335,4 @@ MASTER::みr	/見/観;(字義:みわたす)/視;(字義:じっとみる)/診;(di
 MASTER::わけ	/訳/和気;地名/理由;当て字/分け/分/譯;「訳」の旧字/戯奴
 MASTER::わたしh	/私
 MASTER::を	/小/緒/雄/男/牡/尾/悪/汚/惡;「悪」の旧字(人名用漢字)
-SEKKA::VERSION	1.1.0
+SEKKA::VERSION	1.2.0

data/test/skk-jisyo-in-1.txt

@@ -44,7 +44,7 @@ wake /ウェイク/
 #ちーむ /#0チーム/
 #ねん /#1年/#0年/#3年/#2年/
 #ねん#がつ#にち /#0年#0月#0日/#1年#1月#1日/
-した //
+した
 んん //
 ;; くみこむ ("動詞" "自立")
 くみこむ  //

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: sekka
 version: !ruby/object:Gem::Version
-  version: 1.1.0.pre
+  version: 1.1.1.pre
   prerelease: 6
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-05-04 00:00:00.000000000 Z
+date: 2012-05-17 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: eventmachine