lib/sekka/henkan.nnd in sekka-1.6.1 vs lib/sekka/henkan.nnd in sekka-1.6.2
- old
+ new
@@ -1,10 +1,10 @@
:; #-*- mode: nendo; syntax: scheme -*-;;
;;;
;;; henkan.nnd - 変換エンジンのコア
;;;
-;;; Copyright (c) 2010 Kiyoka Nishiyama <kiyoka@sumibi.org>
+;;; Copyright (c) 2015 Kiyoka Nishiyama <kiyoka@sumibi.org>
;;;
;;; Redistribution and use in source and binary forms, with or without
;;; modification, are permitted provided that the following conditions
;;; are met:
;;;
@@ -385,10 +385,10 @@
;; conversion #f => nil for EmacsLisp
(define (sekkaHenkan userid kvs cachesv keyword limit roman-method)
- (define cache-exp-second (* 60 60))
+ (define cache-exp-second (* 10 60))
(let* ((keyword (keyword.strip))
(sekka-keyword (+ "sekka:" roman-method ":" (limit.to_s) ":" keyword)))
(if-let1 fetched (and cachesv
(cachesv.get sekka-keyword #f))
(begin