.emacs-my
changeset 1202 17ed3f571ca4
parent 1201 c300c3c9e973
child 1204 4f9828e2c186
equal deleted inserted replaced
1201:c300c3c9e973 1202:17ed3f571ca4
    19 (setq recentf-auto-cleanup 600)
    19 (setq recentf-auto-cleanup 600)
    20 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    20 ;; Prevent TRAMP to login on remote host when loading. Its take time and ask passwords!
    21 (setq recentf-keep '(file-remote-p file-readable-p))
    21 (setq recentf-keep '(file-remote-p file-readable-p))
    22 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    22 (setq recentf-exclude                   ; Use ``M-x recentf-cleanup`` to update recentf-list.
    23       '("/devel/[^/]*-\\(orig\\|tmp\\|xxx\\)"
    23       '("/devel/[^/]*-\\(orig\\|tmp\\|xxx\\)"
    24         "/devel/my-\\(merge\\|pull\\)/"))
    24         "/devel/my-\\(merge\\|pull\\)/"
       
    25         "\\.png\\'"))
    25 (setq recentf-max-saved-items 10000)
    26 (setq recentf-max-saved-items 10000)
    26 
    27 
    27 (require 'recentf)
    28 (require 'recentf)
    28 (recentf-mode t)
    29 (recentf-mode t)
    29 
    30 
    30 (global-set-key (kbd "\e\eq")  'recentf-open-files)
    31 (global-set-key (kbd "\e\eq") 'recentf-open-files)
       
    32 (global-set-key [?\s-q] 'recentf-open-files)
    31 
    33 
    32 (setq recentf-max-menu-items 40)
    34 (setq recentf-max-menu-items 40)
    33 (setq recentf-show-file-shortcuts-flag nil)
    35 (setq recentf-show-file-shortcuts-flag nil)
    34 
    36 
    35 ;; (setq recentf-menu-filter 'recentf-arrange-by-dir) ; Too slow with dir widgets.
    37 ;; (setq recentf-menu-filter 'recentf-arrange-by-dir) ; Too slow with dir widgets.