添加YAML支持

llmplusplus · llmplusplus · commit ec51425bafab · 2018-04-04T11:55:21.000+08:00
diff --git a/lisp/init-frame.el b/lisp/init-frame.el
@@ -22,7 +22,7 @@
 	(add-to-list 'default-frame-alist '(font . "Menlo-13"))
 	(set-fontset-font "fontset-default" 'han '("STHeiti"))
 	))
-  
+
   (config-add-hook 'after-make-console-frame-hooks
     ;; 控制台下 C-<方向键> 修复
     (let ((map (if (boundp 'input-decode-map)
@@ -43,15 +43,15 @@
 	(mwheel-install)
       )
     )
-  
+
   (if (and (eq system-type 'darwin) *is-frame*)
       (config-bind-global-key (kbd "C-M-f")
 	;; 使用C-M-f触发全屏模式
 	(if (fboundp 'toggle-frame-fullscreen)
 	    (toggle-frame-fullscreen)
 	  )
 	))
-  
+
   (config-bind-global-key (kbd "C-z")
     ;; 控制台下使用`C-z`暂停程序
     (unless window-system (suspend-frame))
diff --git a/lisp/init-window.el b/lisp/init-window.el
@@ -10,7 +10,7 @@
     (config-after-fetch-require 'ido-select-window
       (global-set-key (kbd "C-x o") 'ido-select-window))
     )
-  
+
   (config-bind-global-key (kbd "C-x 1")
     ;; 删除其它面板，如果没有其它面板就恢复前一个面板布局
     (if (and winner-mode (equal (selected-window) (next-window)))
diff --git a/lisp/init-yaml.el b/lisp/init-yaml.el
@@ -0,0 +1,19 @@
+;;; package -- YAML 模式
+;;; Commentary:
+;;; Code:
+
+(add-to-list 'auto-mode-alist '("\\.yml\\'" . yaml-mode))
+
+(config-after-fetch-require 'yaml-mode
+  (add-hook 'yaml-mode-hook
+            '(lambda ()
+               (define-key yaml-mode-map "\C-m" 'newline-and-indent)))
+  )
+
+(provide 'init-yaml)
+
+;; Local Variables:
+;; coding: utf-8
+;; End:
+
+;;; init-yaml.el ends here

Original file line number	Diff line number	Diff line change
`@@ -10,7 +10,7 @@`
`10`	`10`	`(config-after-fetch-require 'ido-select-window`
`11`	`11`	`(global-set-key (kbd "C-x o") 'ido-select-window))`
`12`	`12`	`)`
`13`		`-`
	`13`	`+`
`14`	`14`	`(config-bind-global-key (kbd "C-x 1")`
`15`	`15`	`;; 删除其它面板，如果没有其它面板就恢复前一个面板布局`
`16`	`16`	`(if (and winner-mode (equal (selected-window) (next-window)))`