lib/sekka/henkan.nnd in sekka-1.1.0.pre vs lib/sekka/henkan.nnd in sekka-1.1.1.pre
- old
+ new
@@ -507,25 +507,20 @@
(cond
((memv dict-line (read-from-string (kvs.get (+ userid "::(stored)") "()")))
#?=(+ "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)
(begin
(insert-to-db lst)
(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)
;; ユーザー定義語彙の登録処理