From 6a33869a2f56859deef690b7d2d83fadf6dc4ba7 Mon Sep 17 00:00:00 2001
From: 10sr <8.slashes@gmail.com>
Date: Mon, 1 Oct 2018 20:15:38 +0900
Subject: [PATCH] Disable recentf mode

---
 emacs.el | 80 ++++++++++++++++++++++++++++----------------------------
 1 file changed, 40 insertions(+), 40 deletions(-)

diff --git a/emacs.el b/emacs.el
index e408b54..4624191 100644
--- a/emacs.el
+++ b/emacs.el
@@ -1261,46 +1261,46 @@ found, otherwise returns nil."
 
 ;; (safe-require-or-eval 'sync-recentf)
 
-(when (safe-require-or-eval 'recentf)
-  (add-to-list 'recentf-exclude
-               (regexp-quote recentf-save-file))
-  (add-to-list 'recentf-exclude
-               (regexp-quote (expand-file-name user-emacs-directory)))
-  (add-to-list 'recentf-exclude
-               "/sync-recentf-marker\\'")
-  (define-key ctl-x-map (kbd "C-r") 'recentf-open-files)
-  (remove-hook 'find-file-hook
-               'recentf-track-opened-file)
-  (defun my-recentf-load-track-save-list ()
-    "Load current recentf list from file, track current visiting file, then save
-the list."
-    (recentf-load-list)
-    (recentf-track-opened-file)
-    (recentf-save-list))
-  (add-hook 'find-file-hook
-            'my-recentf-load-track-save-list)
-  (add-hook 'kill-emacs-hook
-            'recentf-load-list)
-  ;;(run-with-idle-timer 5 t 'recentf-save-list)
-  ;; (add-hook 'find-file-hook
-  ;;           (lambda ()
-  ;;             (recentf-add-file default-directory)))
-  (when (autoload-eval-lazily 'recentf-show)
-    (define-key ctl-x-map (kbd "C-r") 'recentf-show)
-    ;; (add-hook 'recentf-show-before-listing-hook
-    ;;           'recentf-load-list)
-    )
-  (recentf-mode 1)
-  (define-key recentf-dialog-mode-map (kbd "<up>") 'previous-line)
-  (define-key recentf-dialog-mode-map (kbd "<down>") 'next-line)
-  (define-key recentf-dialog-mode-map "p" 'previous-line)
-  (define-key recentf-dialog-mode-map "n" 'next-line)
-  (add-hook 'recentf-dialog-mode-hook
-            (lambda ()
-              ;; (recentf-save-list)
-              ;; (define-key recentf-dialog-mode-map (kbd "C-x C-f")
-              ;; 'my-recentf-cd-and-find-file)
-              (cd "~/"))))
+;; (when (safe-require-or-eval 'recentf)
+;;   (add-to-list 'recentf-exclude
+;;                (regexp-quote recentf-save-file))
+;;   (add-to-list 'recentf-exclude
+;;                (regexp-quote (expand-file-name user-emacs-directory)))
+;;   (add-to-list 'recentf-exclude
+;;                "/sync-recentf-marker\\'")
+;;   (define-key ctl-x-map (kbd "C-r") 'recentf-open-files)
+;;   (remove-hook 'find-file-hook
+;;                'recentf-track-opened-file)
+;;   (defun my-recentf-load-track-save-list ()
+;;     "Load current recentf list from file, track current visiting file, then save
+;; the list."
+;;     (recentf-load-list)
+;;     (recentf-track-opened-file)
+;;     (recentf-save-list))
+;;   (add-hook 'find-file-hook
+;;             'my-recentf-load-track-save-list)
+;;   (add-hook 'kill-emacs-hook
+;;             'recentf-load-list)
+;;   ;;(run-with-idle-timer 5 t 'recentf-save-list)
+;;   ;; (add-hook 'find-file-hook
+;;   ;;           (lambda ()
+;;   ;;             (recentf-add-file default-directory)))
+;;   (when (autoload-eval-lazily 'recentf-show)
+;;     (define-key ctl-x-map (kbd "C-r") 'recentf-show)
+;;     ;; (add-hook 'recentf-show-before-listing-hook
+;;     ;;           'recentf-load-list)
+;;     )
+;;   (recentf-mode 1)
+;;   (define-key recentf-dialog-mode-map (kbd "<up>") 'previous-line)
+;;   (define-key recentf-dialog-mode-map (kbd "<down>") 'next-line)
+;;   (define-key recentf-dialog-mode-map "p" 'previous-line)
+;;   (define-key recentf-dialog-mode-map "n" 'next-line)
+;;   (add-hook 'recentf-dialog-mode-hook
+;;             (lambda ()
+;;               ;; (recentf-save-list)
+;;               ;; (define-key recentf-dialog-mode-map (kbd "C-x C-f")
+;;               ;; 'my-recentf-cd-and-find-file)
+;;               (cd "~/"))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; dired