浏览代码

misc change for darwin

pull/1/head
10sr 12 年前
父节点
当前提交
a7e16d7f7c
共有 1 个文件被更改,包括 6 次插入4 次删除
  1. +6
    -4
      emacs.el

+ 6
- 4
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))


正在加载...
取消
保存