使用alias快速调用函数


之前看的杀哥写的 emacs_alias

其实 defalias 这个函数很有用。xah-fly-keys默认把Alt+x绑定到a上,按起来很方便。 使用次数多的函数,如果找不到一个好的快捷键,就定义一个alias,通过 Alt+x 很快也可以调用。

使用alias后会发现,调用函数需要敲键盘的次数减少,效率其实很高的。

我这样定义一些alias

;; make frequently used commands short
(defalias 'qrr 'query-replace-regexp)
(defalias 'lml 'list-matching-lines)
(defalias 'dml 'delete-matching-lines)
(defalias 'dnml 'delete-non-matching-lines)
(defalias 'dtw 'delete-trailing-whitespace)
(defalias 'sl 'sort-lines)
(defalias 'rr 'reverse-region)
(defalias 'rs 'replace-string)

(defalias 'g 'grep)
(defalias 'gf 'grep-find)
(defalias 'fd 'find-dired)

(defalias 'rb 'revert-buffer)

(defalias 'sh 'shell)
(defalias 'fb 'flyspell-buffer)
(defalias 'sbc 'set-background-color)
(defalias 'rof 'recentf-open-files)
(defalias 'lcd 'list-colors-display)
(defalias 'cc 'calc)

; elisp
(defalias 'eb 'eval-buffer)
(defalias 'er 'eval-region)
(defalias 'ed 'eval-defun)
(defalias 'eis 'elisp-index-search)
(defalias 'lf 'load-file)

; major modes
(defalias 'hm 'html-mode)
(defalias 'tm 'text-mode)
(defalias 'elm 'emacs-lisp-mode)
(defalias 'om 'org-mode)
(defalias 'ssm 'shell-script-mode)

; minor modes
(defalias 'wsm 'whitespace-mode)
(defalias 'gwsm 'global-whitespace-mode)
(defalias 'vlm 'visual-line-mode)
(defalias 'glm 'global-linum-mode)

;; dired
(defalias 'dss 'dired-sort-size)
(defalias 'dst 'dired-sort-time)
(defalias 'dsn 'dired-sort-name)

;; helm
(defalias 'hm 'helm-mini)
(defalias 'irm 'ivy-rich-mode)

(defalias 'mail 'mu4e)
(defalias 'mail-update 'mu4e-update-index)

(defalias 'll 'list-processes)

;; peng-xxx
(defalias 'pdtsu 'peng-delete-trailing-space-and-untabify)

(provide 'init-alias)