From a7e16d7f7c5c983443a3c97e0a9af754f9d3ea23 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Mon, 20 Aug 2012 18:02:34 +0900 Subject: [PATCH] misc change for darwin --- emacs.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/emacs.el b/emacs.el index 8132bf7..66c0334 100644 --- a/emacs.el +++ b/emacs.el @@ -128,7 +128,7 @@ otherwise the path where the library installed." (kill-buffer "*scratch*"))) ;; modifier keys -(setq mac-option-modifier 'control) +;; (setq mac-option-modifier 'control) (setq w32-apps-modifier 'meta) ;; display @@ -300,9 +300,11 @@ drill-instructor.el" ;; (set-face-background 'vertical-border (face-foreground 'mode-line)) -(when (eq system-type 'Darwin) - (mac-set-input-method-parameter 'japanese 'cursor-color "red") - (mac-set-input-method-parameter 'roman 'cursor-color "black")) +(and (or (eq system-type 'Darwin) + (eq system-type 'darwin)) + (fboundp 'mac-set-input-method-parameter) + (mac-set-input-method-parameter 'japanese 'cursor-color "red") + (mac-set-input-method-parameter 'roman 'cursor-color "black")) (when (and (boundp 'input-method-activate-hook) ; i dont know this is correct (boundp 'input-method-inactivate-hook))