dictionary-specification.
;; XXX: Should use backend interface
(defun egg-toroku-region (start end)
(interactive "r")
- (let* ((env (wnn-get-environment)) ; XXX
+ (let* ((env (wnn-get-environment wnn-dictionary-specification)) ; XXX
(kanji (buffer-substring start end))
(yomi (read-multilingual-string
(format "\e$B<-=qEPO?!X\e(B%s\e$B!Y\e(B \e$BFI$_\e(B:" kanji)))