麦蒙无聊（良）的Emacs配置

写这个的原因？

为了拯救Anjuta，gedit，Qt，guide，Vim都爆炸（几乎不可能）的孩子神犇。

经过我按照printf的语法简单YY后，现在Emacs终于资瓷一键编译，一键运行辣！

下面是全部配置，实测编译运行稳定度不错。

F5编译，F6运行。

唯一的编译信息高亮！！！！！！

(load-theme 'tango-dark t)


;;-------------没啥用开始-------
(prefer-coding-system 'utf-8)
(set-default-coding-systems 'utf-8)
(set-terminal-coding-system 'utf-8)
(set-keyboard-coding-system 'utf-8)
;;使用UTF-8
(display-time-mode 1)
;;显示时间
(setq display-time-24hr-format t)
;;时间格式
(setq display-time-day-and-date t)
;;显示时间、星期、日期
(column-number-mode t)
;;状态栏显示行列信息
;;-----------没啥用结束-------------
(global-set-key (kbd "C-a") 'mark-whole-buffer)
;;全选
(global-set-key (kbd "C-z") 'undo)
;;一键撤销
(global-set-key (kbd "RET") 'newline-and-indent)
;;换行时自动缩进
(cua-mode t)
;;Windows的剪切复制粘贴键
(show-paren-mode t)
(global-linum-mode t)
;;括号匹配，显示行号
(blink-cursor-mode -1)
;;光标别闪
(setq kill-ring-max 200)
;;撤销的缓存开大点
(setq default-cursor-type 'bar)
(setq default-tab-width 4)
;;默认tab宽度
(setq c-default-style "awk")
;;缩进风格
(setq auto-save-default nil)
;;不要#×#的文件
(setq make-backup-files nil)
;;也不要×~的文件
(electric-pair-mode 1)
(setq electric-pair-pairs
      '(
		(?\" . ?\")  ;; 添加双引号补齐
		(?\{ . ?\})  ;; 添加大括号补齐
		(?\' . ?\'))) ;; 添加单引号补齐
(global-set-key [f5] 'compile-file)
(defun compile-file()(interactive)
(save-buffer)
(compile(format "g++ -o '%s' '%s' -lm -Wall";;其他编译指令请自行增加。
(file-name-sans-extension(buffer-name))(buffer-name))))

(global-set-key [f6] 'runthis)
(defun runthis()(interactive)
(term(format "./%s"
(file-name-sans-extension(buffer-name)))))