Emacs中快速访问远程主机的文件

作者:

工作中因为要经常用dired访问远程主机上的文件，每次都要输入一大堆的主机名和路径，比如为了访问远程机器home目录下的一个文件，我需要输 入：

/:~/working/filename.pl

每次输入一遍主机名不仅难记，而且效率十分低下。

后来发现了一段lisp程序，可以在Emacs中给那些常用的路径起别名，比如可以将

/:~

命名为home，那么以后就可以直接用

@home/working/filename.pl

来访问上面的那个文件了。

最近我把这段程序整理成了一个单独的扩展，并做了一些改进（主要是让别名列表成为custom variable），就拿出来跟大家分享一下（）。
扩展使用起来很简单，下载以后放到Emacs的site-lisp目录下，然后修改你的.emacs，加入：

(require 'drkm-fav)

随后用setq命令便可以给路径定制自己的别名了，比如：

^? LISP

1 2 3

(setq drkm-fav:favourite-directories-alist '(("home" . "/[e-mail]:~") ("kernow-src" . "~/xslt/kernow/svn-2007-09-29/kernow/trunk/src/net/sf/kernow")))

这样就建立了home和kernow-src两个别名。

要是嫌编辑.emacs麻烦的话，也可以通过Emacs的Custom Variable机制来设置和保存drkm-fav:favourite-directories-alist（M-x customize-option），不过要注意的是设置的时候每个字符串都需要加上双引号。

最后附上我的一部分设置，大家可以参考其中的一些技巧，比如如何重用主机名：

^? LISP

1 2 3 4 5

(setq drkm-userhost "[e-mail]") (setq drkm-root (concat "/" (concat drkm-userhost ":"))) (setq drkm-fav:favourite-directories-alist (list (cons "home" (concat drkm-root "~")) (cons "root" drkm-root)))