lib/sekka/convert-jisyo.nnd in sekka-0.9.6 vs lib/sekka/convert-jisyo.nnd in sekka-0.9.7

@@ -40,21 +40,21 @@
 
 (define (expand-hiragana-phrase-entry key)
   (let1 roman-list (gen-hiragana->roman-list key)
     (if (< 1000 (length roman-list))
         (begin
-          (STDERR.printf " Warning: ignored entry [%s] (hiragana phrase), because too many pattens.\n" key)
+          #?=(sprintf " Warning: ignored entry [%s] (hiragana phrase), because too many pattens.\n" key)
           #f) ;; パターン数が爆発した単語は無視する
         (map
          (lambda (x)
            (cons (+ "=" x) key))
          roman-list))))
 
 (define (expand-okuri-nashi-entry key value)
   (let1 roman-list (gen-hiragana->roman-list key)
     (if (< 1000 (length roman-list))
         (begin
-          (STDERR.printf " Warning: ignored entry [%s %s] , because too many pattens.\n" key value)
+          #?=(sprintf " Warning: ignored entry [%s %s] , because too many pattens.\n" key value)
           #f) ;; パターン数が爆発した単語は無視する
         (append
          (map
           (lambda (x)
             (cons x (+ "C" key)))