-(require 'skk-autoloads)
-(require 'skk-study)
-(global-set-key "\C-x\C-j" 'skk-mode)
-(global-set-key "\C-xj" 'skk-auto-fill-mode)
-(global-set-key "\C-xt" 'skk-tutorial)
-(setq skk-use-jisx0201-input-method t)
-(setq skk-rom-kana-rule-list
- '(("@" nil "@")
- ("wi" nil ("ヰ" . "ゐ"))
- ("we" nil ("ヱ" . "ゑ"))
- ;;("hh" "h" ("ン" . "ん"))
- ;;("mm" "m" ("ン" . "ん"))
- ("zx" nil ("ゝ" . "ヽ"))
- ("zc" nil ("ゞ" . "ヾ"))))
-(set-input-method 'japanese-skk) ; INPUT METHOD
+(require-if-present 'skk-autoloads)
+(if (featurep 'skk-autoloads)
+ (progn
+ (require-if-present 'skk-study)
+ (global-set-key "\C-x\C-j" 'skk-mode)
+ (global-set-key "\C-xj" 'skk-auto-fill-mode)
+ (global-set-key "\C-xt" 'skk-tutorial)
+ (setq skk-use-jisx0201-input-method t)
+ (setq skk-rom-kana-rule-list
+ '(("@" nil "@")
+ ("wi" nil ("ヰ" . "ゐ"))
+ ("we" nil ("ヱ" . "ゑ"))
+ ;;("hh" "h" ("ン" . "ん"))
+ ;;("mm" "m" ("ン" . "ん"))
+ ("zx" nil ("ゝ" . "ヽ"))
+ ("zc" nil ("ゞ" . "ヾ"))))
+ (set-input-method 'japanese-skk))) ; INPUT METHOD