免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 1281 | 回复: 0

最近打开过的文件 [复制链接]

论坛徽章:
0
发表于 2009-01-30 22:49 |显示全部楼层

    最近打开过的文件
   
Created:  Fang lungang(Ark) 01/30/2009
Modified: Fang lungang(Ark) 01/30/2009 01:49>
home
recentf.el (Emacs 22 以后都自带了)提供了常见的“recent files”功能,可
以从菜单栏选择打开一个最近访问过的文件。稍作扩展后,则非常方便。
基本配置
它的基本配置如下
;;; recently opened file
(require 'recentf)
(setq recentf-max-saved-items 100)
(recentf-mode 1)
远程文件
如果 recentf 和 desktop-save-mode 功能都激活了,访问过远程文件(另一台
服务器上的文件)之后,每次启动都会试图去访问那个服务器。这个特别烦人,
尤其是要输入密码。做如下配置告诉 recentf 不要去检查远程文件:
;; add at the front of list, don't conncect to remote hosts
(add-to-list 'recentf-keep 'file-remote-p)
快捷方式
Emacs 老手都知道“键盘+自动补齐”比“鼠标点击”要方便且高效很多。此处也一
样,设想一下列表有一百个文件,要从中挑选一个,是用鼠标快还是键盘快?用
下面的配置,几乎 100% 是键盘快。只要输入文件名中包含的任意几个字符(不
区分大小写)就可以迅速定位到想打开的文件了。
;;; refer to lgfang-init.el for latest update
(define-key global-map [f5] 'my-recentf-open)
(setq ido-enable-flex-matching t)
(defun my-recentf-open ()
  "open recent files.  In ido style if applicable --lgfang"
  (interactive)
  (let* ((path-table (mapcar
                      (lambda (x) (cons (file-name-nondirectory x) x))
                      recentf-list))
         (file-list (mapcar (lambda (x) (file-name-nondirectory x))
                            recentf-list))
         (complete-fun (if (require 'ido nil t)
                           'ido-completing-read
                         'completing-read))
         (fname (funcall complete-fun "File Name: " file-list)))
    (find-file (cdr (assoc fname path-table)))))
  
               
               
               

本文来自ChinaUnix博客,如果查看原文请点:http://blog.chinaunix.net/u/23408/showart_1809058.html
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP