;; This file is part of Egg on Nemacs (Jpanese Environment)

;; Egg is distributed in the forms of patches to GNU
;; Emacs under the terms of the GNU EMACS GENERAL PUBLIC
;; LICENSE which is distributed along with GNU Emacs by the
;; Free Software Foundation.

;; Egg is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied
;; warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
;; PURPOSE.  See the GNU EMACS GENERAL PUBLIC LICENSE for
;; more details.

;; You should have received a copy of the GNU EMACS GENERAL
;; PUBLIC LICENSE along with Nemacs; see the file COPYING.
;; If not, write to the Free Software Foundation, 675 Mass
;; Ave, Cambridge, MA 02139, USA.

(if (boundp 'WNN)
    (progn
      (add-wnn-server 'jserver)
      (define-key fence-mode-map "\eh" 'fence-hiragana)
      (define-key fence-mode-map "\ek" 'fence-katakana)
      (define-key fence-mode-map "\e<" 'fence-hankaku)
      (define-key fence-mode-map "\e>" 'fence-zenkaku)))

(define-key fence-mode-map "\eq" 'its:select-downcase)
(define-key fence-mode-map "\eQ" 'its:select-upcase)

;; (load "its/kanainput")
(load "its/hira")
(load "its/kata")
(load "its/hankaku")
(load "its/zenkaku")
;; to enable han-kata requires more 5000 EGG_PURESIZE
;; (load "its/han-kata")

(its:set-standard-mode)
