Emacs的快捷键

cpp 代码

直接用文件名打开文件

  filecache 包提供了直接用文件名打开文件的方法，不用关心文件在那个目录里
  面。在打开文件时，minibuffer 中按 C-tab，直接打开相应文件。

  (eval-after-load "filecache"
   '(progn (file-cache-add-directory-using-find "~/projects")
           (file-cache-add-directory-list '("~/work" "~/work/proj1" "~/work/proj2"))
           (file-cache-add-file-list (list "~/foo/bar" "~/baz/bar"))))

  (define-key minibuffer-local-completion-map [C-tab] 'file-cache-minibuffer-complete)
  (define-key minibuffer-local-map [C-tab] 'file-cache-minibuffer-complete)
  (define-key minibuffer-local-must-match-map [C-tab] 'file-cache-minibuffer-complete)

----
修改文件名补全后缀

  (setq completion-ignored-extensions
        (append '(".bin" ".ext" ".free")
                completion-ignored-extensions))
  (delete ".log" completion-ignored-extensions)

----
在 Windows XP 上使用的字体

  (create-fontset-from-fontset-spec
    (concat
     "-*-Courier New-normal-r-*-*-13-*-*-*-c-*-fontset-chinese,"
     "chinese-gb2312:-*-MS Song-normal-r-*-*-14-*-*-*-c-*-gb2312*-*"))
  (create-fontset-from-fontset-spec
    (concat
     "-*-Courier New-bold-r-*-*-13-*-*-*-c-*-fontset-chinesebold,"
     "chinese-gb2312:-*-MS Song-bold-r-*-*-14-*-*-*-c-*-gb2312*-*"))
  (setq default-frame-alist
    '((font . "fontset-chinese")))
  (set-face-font 'bold "fontset-chinesebold")

----
pop up marks

  (global-set-key "\C-z" 'set-mark-command)
  (global-set-key "\C-x\C-p" 'pop-global-mark)

  C-u C-z   cycle in local buffer mark ring.
  C-x C-p   cycle in global mark ring.

----
工具栏添加 LaTeX 文档的章节索引

  使用 AUCTeX 和 RefTeX 编辑 LaTeX 文件时，如果你喜欢用鼠标，不妨试试这个，
  可以在工具栏添加一个“Index”菜单，直接在你的章节之间跳转。

    M-x imenu-add-menubar-index 或者
    (setq reftex-load-hook (quote (imenu-add-menubar-index)))
    (setq reftex-mode-hook (quote (imenu-add-menubar-index)))

----
退出 picture mode 可以用 C-c C-c

  据说是一个没有文档的键。

----
find tags

  M-.           find-tag
  C-M-.         find-tag-regexp

  C-x 4 .       find-tag-other-window
  C-x 5 .       find-tag-other-frame

----
sexp operate

  backward-kill-sexp            M-C-BACKSPACE
  backward-sexp                 C-M-b
  eval-last-sexp                C-x C-e
  eval-print-last-sexp          M-x eval-print-last-sexp RET
  forward-sexp                  C-M-f
  indent-pp-sexp                M-x indent-pp-sexp RET
  indent-sexp                   M-x indent-sexp RET
  kill-sexp                     C-M-k
  last-sexp-toggle-display      M-x last-sexp-toggle-display RET
  mark-sexp                     C-M-SPC, C-M-@
  pp-eval-last-sexp             M-x pp-eval-last-sexp RET
  raise-sexp                    M-x raise-sexp RET
  transpose-sexps               C-M-t

----
Abbrev misc

  M-'           abbrev-prefix-mark
  C-x '         expand-abbrev
  C-M-/         dabbrev-completion

----
分栏编辑

  C-x 6         2C-command
  C-x 6 s   2C-split
  C-x 6 b   2C-associate-buffer
  C-x 6 2   2C-two-columns

----
调整窗口

  C-x +         balance-windows
  C-x -         shrink-window-if-larger-than-buffer

----
不太常用，但比较有用的键

  C-x TAB       indent-rigidly
  M-^           delete-indentation

  C-x C-n       set-goal-column
  C-x ;         comment-set-column

  C-x <         scroll-left
  C-x >         scroll-right
  C-x [         backward-page
  C-x ]         forward-page

  C-x l         count-lines-page
  C-x =         what-cursor-position

  C-M-S-v       scroll-other-window-down

  Register&Bookmark:
  C-x r l       bookmark-bmenu-list
  C-x r r       copy-rectangle-to-register
  C-x /         point-to-register-compatibility-binding
  C-x g         insert-register-compatibility-binding
  C-x j         jump-to-register-compatibility-binding
  C-x x         copy-to-register-compatibility-binding
  M-r           move-to-window-line

----
不太常用，但没什么用的键

  C-x C-d       list-directory
  C-x C-r       find-file-read-only
  C-x i         insert-file
  C-x LEFT      prev-buffer
  C-x RIGHT     next-buffer
  M-g           facemenu-keymap

----
用某个编码重新加载文件

  C-x C-m r ... RET    (revert-buffer-with-coding-system)

----
GNU Emacs (CVS) 的键盘宏(keyboard macro)

  CVS 中的 Emacs 增加了一个 kmacro 包，扩展了原来的键盘宏的功能，增加了内
  置的计数器、键盘宏单步执行工具、用 kmacro-ring 保存多个宏。

  C-x C-k SPC “调试”定义的宏很方便。

  C-x C-k {C-p,C-n,C-v}+ 选定要执行的宏之后，按 {C-k}+ 就执行了，还可以再
  按{C-p,C-n}+ 再选定，再执行；{C-d} 删除选定的宏。

  C-x C-k {C-m,RET,C-e} 相当于原来的 C-x C-k，直接编辑最后一个定义的宏。

  定义键盘宏时，用 C-x q 来提示是否继续，用 C-u C-x q 可以输入任意的内容
  (C-M-c 退出递归编辑)。

  C-x C-k b 可以把刚刚定义的宏绑定到一个键上，默认的 [0-9A-Z] 用来绑定相
  应的 C-x C-k [0-9A-Z]。

  C-x C-k r 在 region 中执行宏。

  C-x C-k n 命名最后一个定义的宏。命名之后，可以用 M-x insert-kbd-macro
  保存到文件，以便以后使用。

  F3 可以象 C-x ( 一样开始键盘宏的定义，也可一象 C-x C-k C-i 一样插入内置
  计数器的值。F4 可以象 C-x ) 一样结束宏的定义，也可以象 C-x e 一样调用宏。

  键盘宏的内置计数器：

    C-x C-k {C-i,TAB} 插入计数器的值，每次插入都增加1或前缀参数大小；
    C-x C-k C-a 增加计数器的值，提示输入或前缀参数大小；
    C-x C-k C-c 设置计数器的值，提示输入或前缀参数大小；
    C-x C-k C-f 设置插入计数器值的格式。

  from emacswiki:
    想定义宏的时候不需要 C-x ( ... C-x )，只须做一遍你的宏，然后用 C-x
    C-k l，从中去掉不要的内容，添一个名字和绑定的键，最后 C-c C-c。

----
添加自己的关键字

  font-lock-add-keywords

   (font-lock-add-keywords 'c-mode
    '(("\\<\\(FIXME\\):" 1 font-lock-warning-face prepend)
      ("\\<\\(and\\|or\\|not\\)\\>" . font-lock-keyword-face)))

----
有选择查看：selective-display

  比如这个文件，用

    M-1 C-x $

  则只显示每一条的主题，省略内容

    ,----[ M-1 C-x $ ]
    | ----
    | 修改 Emacs 的错误提示音
    | ...
    | ----
    | 生成 Emacs 对话框
    | ...
    | ----
    | 这样移动缓冲也不错
    | ...
    | ----
    | keywiz 游戏
    | ...
    `----

  实际上是通过缩进量，对“行”选择.只显示行首在某列以内的行

  M-2 C-x $  行首在前 2 列内的
  M-4 C-x $  行首在前 4 列内的
  C-x $      取消

----
修改 Emacs 的错误提示音

  (set-message-beep 'silent)

  系统：   'asterisk, 'exclamation, 'hand, 'question, 'ok
  无声：   'silent
  机器喇叭：nil

----
生成 Emacs 对话框

  (if (yes-or-no-p "Are you feeling well? ")
       (message "You appear to be feeling well.")
    (message "Hope you will get better soon!"))

  (if (x-popup-dialog t '("Are you feeling well?" ("Yes" . t) ("No" . nil)))
      (message "You appear to be feeling well.")
    (message "Hope you will get better soon!"))

----
这样移动缓冲也不错

  随时移动，不需要 view mode，可惜是需要上下键：
  (global-set-key [M-down] '(lambda () (interactive) (scroll-up   1)))
  (global-set-key [M-up]   '(lambda () (interactive) (scroll-down 1)))

----
keywiz 游戏

  kbd-macro-query
    Query user during kbd macro execution.
    Nope.  The correct answer is: C-x q

  repeat-complex-command
    Edit and re-evaluate last complex command, or ARGth from last.
    Incorrect.  The correct answer is: , , C-x M-:, C-x M-ESC

----
CDLaTeX 的 *CDLaTeX Help* 问题

  C-c ? 打开的 *CDLaTeX Help* 缓冲，缺省打开了 view mode，而后来的“'”，
  “`”命令的提示都使用并修改这个缓冲的内容，但 view mode 不可修改，以至
  发生错误。

  在其中的 cdlatex-turn-on-help 函数修改了一下，暂时解决这个毛病：
  "(erase-buffer)" 之前加一句 "(view-mode -1)"。

  [URL:http://zon.astro.uva.nl/~dominik/Tools/cdlatex/]

----
替换文件名中的环境变量

  (substitute-in-file-name "$HOME/.emacs.d/.emacs.el")

----
高亮显示 C/C++ 中的可能的错误(CWarn mode)

  配置：(global-cwarn-mode 1)
  手动：M-x cwarn-mode
  参考：C-h v cwarn-configuration

----
数字键直接作为前缀参数的全局子模式 (Autoarg mode)

  配置：(autoarg-mode 1)
  手动：M-x autoarg-mode & autoarg-kp-mode
  参考：Commentary in emacs/lisp/autoarg.el

  任何模式下的数字全都是前缀参数了，M-2 C-n 只需 2 C-n；但想输入数字时，
  得用 C-2 C-3 或 23 SPC。

----
Windows 上 Emacs 启动时最大化

  Windows 注册表中添加 (不要 toolbar)：
    HKEY_LOCAL_MACHINE\SOFTWARE\GNU\Emacs\EMACS.Toolbar=0 (REG_SZ)
  .emacs.el 中：
   (w32-send-sys-command #xf030)

----
BibTeX 自动产生的 key 的方法

  参考：C-h f bibtex-generate-autokey RET

----
yap, gnserv, emacs 反向查找

  yap: view->options->Inverse Search->Command line 中：
    "gnuclientw.exe" "-q"  "+%l" "%f"

  GNUSERV setup:
    (gnuserv-start)
    (setq gnuserv-frame (selected-frame))
    (setenv "GNUSERV_SHOW_EMACS" "1")

----
Calendar 中显示农历节日

  (setq local-holidays
        '((holiday-chinese 1 15 "元宵节 (正月十五)")
          (holiday-chinese 5  5 "端午节 (五月初五)")
          (holiday-chinese 9  9 "重阳节 (九月九)")
          (holiday-chinese 8 15 "中秋节 (八月十五)")))

  (autoload 'chinese-year "cal-china" "Chinese year data" t)

  (defun holiday-chinese (cmonth cday string)
    "Chinese calendar holiday, month and day in Chinese calendar (CMONTH, CDAY).

  If corresponding MONTH and DAY in gregorian calendar is visible,
  the value returned is the list \(((MONTH DAY year) STRING)).
  Returns nil if it is invisible in the current calendar window."
    (let* ((m displayed-month)
         (y displayed-year)
         (gdate (calendar-gregorian-from-absolute
                 (+ (cadr (assoc cmonth (chinese-year y))) (1- cday)))))
      (increment-calendar-month m y (- 11 (car gdate)))
      (if (> m 9) (list (list gdate string)))))

----
查看 frame 参数

  (frame-parameter nil 'width)
  (frame-parameter nil 'height)
  (frame-parameter nil 'left)
  (frame-parameter nil 'top)
  放在 default-frame-alist 中的四个参数，先调整、查看，再修改

  或者更直接的：
  (frame-parameters nil)

----
设置 C Source 目录

  (setq find-function-C-source-directory "~/work/emacs/src")

----
不显示 HTML 中的标签

  HTML-mode:
    C-x C-i (sgml-tags-invisible)

----
颠倒一块文本

   M-x reverse-region     以行为单位颠倒文本

----
BibTeX 管理 bib 文件

  添加、修改很方便。from o8o@smth:
    1. 可以根据需要插入一个模板 (参考 C-c C-e C-h)；
    2. 可以方便清除模板中不需要的项目 (C-c C-c)；
    3. 插入后可以生成一个自己需要的 Key (自动或手动的)；
    4. 可以根据 Key 把参考文献排序插入，不用担心重复查入同一条文献
       (C-h v bibtex-maintain-sorted-entries)；
    5. 在各个项中移动很方便 (TAB & C-j)。

----
RefTeX 管理/浏览/调整 TeX 文件中的章节、标签、引用、索引等

  可以和 AUCTeX 配合使用。
  (setq reftex-plug-into-AUCTeX t)
  (add-hook 'TeX-mode-hook 'turn-on-reftex)

  还可以再 TeX buffer 中创建索引、标签、引用等。

----
插入 -*- MODENAME -*- 标签

  (defun chunyu-insert-file-variable ()
    "Insert file variable string \"-*- Major-Mode-Name -*-\" with
  comment char"
    (interactive)
    (insert
     (concat comment-start " -*- "
             (substring
              (symbol-name (symbol-value 'major-mode)) 0 -5)
             " -*- " comment-end)))

----
CVS AUCTeX 中有 ConTeXt 模式

  不需要自己装了，而且绑定和 LaTeX-mode 差不多。

    export CVS_RSH="ssh"
    cvs -z3 -d:ext:[e-mail]:/cvsroot/auctex co auctex
    cd auctex && ./autogen.sh && ./configure
      (如果在 Windows 上，编辑 Makefile, doc/Makefile，修改其中的 info,
       prefix 目录)
    make && make install

----
feedmail instead of fakemail

  feedmail package 似乎可以代替 fakemail.exe 发信，不过还不清楚如何配置。

  可惜如果在 Windows 上，需要 sh.exe 和 rmail.exe 等:(。

----
去掉 .emacs 中不再需要的绑定（现在很少使用了）

  (define-prefix-command 'ctl-x-m-map)
  (global-set-key "\C-xm" 'ctl-x-m-map)
  (define-key ctl-x-m-map "e" 'cvs-examine)
  (define-key ctl-x-m-map "m" 'man-follow)
  (define-key ctl-x-m-map "g" 'run-scheme)
  (define-key ctl-x-m-map "b" 'list-bookmarks)
  (define-key ctl-x-m-map "l" 'browse-kill-ring)
  (define-key ctl-x-m-map "a" 'align-current)

----
Commentary of emacs-cvs/lisp/iimage.el

  should be:
  (autoload 'iimage-mode "iimage" "Inline image." t)
  (autoload 'turn-on-iimage-mode "iimage" "Inline image." t)
  ;; ``I''nfo-mode-hook
  (add-hook 'Info-mode-hook 'turn-on-iimage-mode)

----
使用 gnuserv.exe 少不了的参数:

  (gnuserv-start)
  (setq gnuserv-frame (selected-frame))
  (setenv "GNUSERV_SHOW_EMACS" "1")

----
当前终端能否显示支持的字体（判断图形终端的令一个方法）

  (display-multi-font-p)

  Return non-nil if DISPLAY is a graphic display.
  (display-multi-font-p &optional DISPLAY)

----
通过 smbclient 在 Linux box 上给 Windows box 发送 net message

  Linux -> Windows (Net-Message) in Emacs:

    M-| smbclient -M 机器名

  或者直接：
  cat "Hello!" | smbclient -M 机器名

----
Outline minor mode 的键前缀

  缺省的：

    C-c @

  或者自己修改：

    (setq outline-minor-mode-prefix "\C-c\C-o")

----
Windows 上用相关联的程序打开文件

  (eval-after-load "dired"
    '(progn
       ;; Dired 原来的 “o” 对我来说基本没用。
       (define-key dired-mode-map "o" 'chunyu-dired-open-explorer)))

  (defun chunyu-dired-open-explorer ()
    (interactive)
    (let ((file-name (dired-get-file-for-visit)))
      (if (file-exists-p file-name)
          (w32-shell-execute "open" file-name nil 1))))

  原来使用 cmd.exe 的 start 命令，但路径中不能有空格。这个
  w32-shell-execute 就没问题了，还不错。

  此外，从另一个人的 .emacs 中学来的，可以同时打开所有做标记的文件：
  (defun dired-execute-file (&optional arg)
    (interactive "P")
    (mapcar #'(lambda (file) (w32-shell-execute "open" file))
            (dired-get-marked-files nil arg)))

  而且可以绑定到鼠标上，用鼠标中键(mouse-2)或双击(double-mouse-1)打开：
  (define-key dired-mode-map [mouse-2] 'dired-mouse-execute-file)
  (defun dired-mouse-execute-file (event)
    "In dired, execute the file or goto directory name you click on."
    (interactive "e")
    (set-buffer (window-buffer (posn-window (event-end event))))
    (goto-char (posn-point (event-end event)))
    (dired-execute-file))

----
使用 Windows 上的左右 Win 键

  (setq w32-pass-rwindow-to-system nil)
  (setq w32-rwindow-modifier 'hyper)
  (setq w32-pass-lwindow-to-system nil)
  (setq w32-lwindow-modifier 'hyper)

  例如：
  (global-set-key [(hyper ?z)] 'compile)

----
Dumping emacs 的参数

  #!/bin/sh
  MYEMACS=$1
  ./$MYEMACS --batch --load ~/.emacs.d/.emacs.el \
             --execute "(dump-emacs \"mymacs\" \"$MYEMACS\")"

----
几个 list 命令，列出一些变量

  M-x list-colors-display RET
  M-x list-faces-display RET

    (setq list-faces-sample-text
          "赵钱孙李 周吴郑王 abcdefg..z ABCDEFG..Z")

  M-x list-charset-chars
  M-x list-character-sets
  M-x list-load-path-shadows
  M-x list-options
  M-x list-color-display
  M-x list-registers
  M-x list-command-history
  M-x list-processes
  M-x list-input-method

----
CVS Emacs 查看 utf-8

  M-x utf-translate-cjk-mode
  (utf-translate-cjk-mode 1)

----
执行 cmd.exe 的 start 命令

  (start-process "dir" nil "cmd.exe" "/c" "start" "c:")
  当然，用 w32-shell-execute 更好些。

----
beginning-of-buffer 的前缀参数

  M-2 M-x beginning-of-buffer RET (M-2 M-<)  缓冲首 20%
  M-5 M-x beginning-of-buffer RET (M-5 M-<)  缓冲首 50%

----
显示位点附近 elisp 函数的定义

  M-x eldoc-mode RET

  写 elisp 时应该比较有用，实时提示函数的定义格式。

----
查看当前字符的 face

  M-x describe-text-properties RET
  Find which face is being used at the point.

  M-x describe-face RET

----
使 search-ring 称为 buffer-local 的

  这样 search 的历史根据 buffer 而不同。

  (make-variable-buffer-local 'search-ring)
  ;; (make-variable-buffer-local 'isearch-string)

  make C-s C-s ... search with strings in buffer local search ring.

----
历史命令的 elisp 列表

  M-x command-history RET

----
清理 current emacs session

  M-x clean-buffer-list RET

  M-x kill-some-buffers RET

  or kill-all-buffers:
   &