一些有用的 Emacs 配置（窗口快速切换、一键透明效果、任意位置删除整行等）
本篇文章记录的是一些有用的 Emacs 配置，有些是自己原创，有些是借鉴别人（能记起来出处的我放了链接）。
规定：C 代表 Ctrl，M 代表 Alt。
1.设置一次跳跃 n 行的快捷键
按 C-M-n 可以连续下跳 5 行，按 C-M-p 可以连续上跳 5 行：
1 (global-set-key (kbd "C-M-n")
2 (lambda () (interactive) (next-line 5)))
3 (global-set-key (kbd "C-M-p")
4 (lambda () (interactive) (previous-line 5)))
2. 在一个 emacs 中打开多个 shell buffer
在 emacs 中，使用 M-x(输入: shell 或 eshel) 来打开 shell 的 buffer，当作 shell 终端使用。但是有时候需要在一个 emacs 中打开多个 shell buffer，需要进行一下设置：
1 ;; set open multi shell
2 (defun wcy-shell-mode-auto-rename-buffer (text)
3 (if (eq major-mode 'shell-mode)
4 (rename-buffer (concat "shell:" default-directory) t)))
5 (add-hook 'comint-output-filter-functions'wcy-shell-mode-auto-rename-buffer)
3. 窗口操作的撤销和重做
在 emacs 中，使用 C-x,2 或 C-x,3 来新建窗口，使用 C-x,0 或 C-x,1 来关闭窗口，这些称为窗口操作。在进行窗口操作时有时候需要撤销或重做，可以使用以下配置：
C-x,4,u 代表撤销，C-x,4,r 代表重做。
1 ;;set windows undo and redo
2 (when (fboundp 'winner-mode)
3 (winner-mode 1)
4 (global-set-key (kbd "C-x 4 u") 'winner-undo)
5 (global-set-key (kbd "C-x 4 r") 'winner-redo)
6 )
（感谢 redguardtoo）
4. 在行末或行中位置删除整行
在 emacs 默认设置中，要想删除整行，需要先 C-a 跳到行首，然后使用 C-k 来删除整行，有些不方便。通过一下配置，可以使用 C-w 来删除整行（操作时不用事先选中整行），同时不影响原有的剪切功能。M-w 也可以在不事先选中整行的情况下复制整行。
1 (defadvice kill-ring-save (before slickcopy activate compile)
2 (interactive
3 (if mark-active (list (region-beginning) (region-end))
4 (list (line-beginning-position)
5 (line-beginning-position 2)))))
6 (defadvice kill-region (before slickcut activate compile)
7 (interactive
8 (if mark-active (list (region-beginning) (region-end))
9 (list (line-beginning-position)
10 (line-beginning-position 2)))))
（感谢浏忙大爆炸）
5. 在各个窗口之间快速切换
在 emacs 的默认设置中，需要使用 C-x, o 来进行窗口切换，颇为不便，特别是窗口数量比较大的时候。通过以下设置，可以使用 M-1/M-2/M-3/.../M-9 来快速切换到第 1/2/3/.../9 窗口（窗口上有编号）。
事先下载 window numbering el，放置到~/.emacs.d/ 目录下，然后在.emacs 中做以下配置：
1 ;;set windows numbering
2 (require 'window-numbering)
3 (window-numbering-mode 1)
（感谢 redguardtoo）
6. 设置 color-theme 主题
下载 color-theme，放置到~/.emacs.d/ 目录下，然后在.emacs 中做以下配置：
1 ;;set color theme
2 (add-to-list 'load-path"~/.emacs.d/")
3 (require ')
4 (color-theme-initialize)
5 ;; 这个是你选择的主题，后面的 calm forest 就是它的名字，注意使用小写。
6 (color-theme-calm-forest)
(7) 设置透明效果
我觉得这个很有用，特别是需要一边写代码一边看参照其他文档时。按 F11 键可以一键切换透明度，非常方便：
1 ;;set transparent effect
2 (global-set-key [(f11)] 'loop-alpha)
3 (setq alpha-list '((100 100) (95 65) (85 55) (75 45) (65 35)))
4 (defun loop-alpha ()
5 (interactive)
6 (let ((h (car alpha-list))) ;; head value will set to
7 ((lambda (a ab)
8 (set-frame-parameter (selected-frame) 'alpha (list a ab))
9 (add-to-list 'default-frame-alist (cons 'alpha (list a ab)))
10 ) (car h) (car (cdr h)))
11 (setq alpha-list (cdr (append alpha-list (list h))))
12 )
13 )
（感谢 ccat）
8. 将光标移动到当前行的中间位置
Emacs 可以将光标跳到行首（C-a）和行尾（C-e），但是没有跳到行中的快捷键。可以通过以下配置来实现：
将 C-z 绑定为将光标移动到当前行的中间位置。
1 (defun middle-of-line ()
2 "Put cursor at the middle point of the line."
3 (interactive)
4 (goto-char (/ (+ (point-at-bol) (point-at-eol)) 2)))
5 (global-set-key (kbd "C-z") 'middle-of-line)
9. 优化注释功能
Emacs 的默认设置中，M-; 可以起到注释的作用，但是有不方便的地方：必须在选中一部分区域后才能进行注释。通过如下配置，可以达到以下效果：当光标位于行尾时，M-; 在行尾进行注释；当光标位于其他位置时，M-; 起到注释该行的作用；当选中一部分区域时，M-; 起到注释该区域的作用。
1 (defun qiang-comment-dwim-line (&optional arg)
2 (interactive "*P")
3 (comment-normalize-vars)
4 (if (and (not (region-active-p)) (not (looking-at "[ \t]*$")))
5 (comment-or-uncomment-region (line-beginning-position) (line-end-position))
6 (comment-dwim arg)))
7 (global-set-key "\M-;" 'qiang-comment-dwim-line)
（感谢 cmdblock）
附录：
这部分是一些快捷键备忘。
(1) 编辑
M-\：删除光标处的所有空格和 Tab 字符
M-SPC：删除光标处的所有空格和 Tab 字符，但留下一个。
C-x C-o：删除光标周围的空白行，保留当前行。
C-o：插入空行。
M-^：将两行合为一行，删除之间的空白和缩进。
C-k：从光标处起删除该行。
M-z char：删至字符 char 为止
连续使用 kill 命令（M-w 除外），所 kill 掉的东西会智能的连在一起。还可以使用 C-M-w（紧接一个 kill 命令）强制下次删除加入上一个记录中。
M-y（我重定义为 M-p）：这个命令只能在刚用完 C-y 后使用。它的作用是用 kill 环中再前一个内容替换掉刚用 C-y 粘贴出来的内容。
M-;：注释。
shift+ 其他操作（比如 C-a,C-e,C-f,C-b 等）可以选中特定内容。注意：按大写键可以辅助该操作。
C-@：mark set，开始选定模式。
C-g：退出选定模式。
C-x h：全选。
C-x C-f：打开文件。
C-x C-v：更换文件。
C-x C-s：保存 buffer。
C-x C-w：另存为 buffer。
C-x k：关闭 buffer。
(2) 浏览
M-m：跳过所有空格
M-g g：跳到指定行
C-v：下翻页。
M-v：上翻页。
C-l：置中。
M-<：文首。
M->：文末。
M-r ：移动到页面中间行首位置。
C-l：将当前行提到页面中间。
C-s：向后查找，再按一次则跳到下一个匹配项。
C-r：向前查找，再按一次则跳到下一个匹配项。
M-%：替换。
(3) 窗口操作
C-x 5 b：在另一个窗口选择 buffer。
C-x 0：关闭本窗口。
C-x 4 0：关闭本窗口及 buffer。
C-x 1：关闭其他窗口。
C-x 2：垂直拆分窗口。
C-x 3：水平拆分窗口。
(4) 其他
C-x C-c：退出 emacs。
C-x z：重复命令。
原文： https://www.cnblogs.com/yjie/p/4059145.html
