From aab5bfd074e57d06a79e39d7c7c4760e1f385a06 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Mon, 17 Oct 2022 21:41:28 -0500 Subject: Bankruptcy 9 --- lisp/+dired.el | 28 ---------------------------- 1 file changed, 28 deletions(-) delete mode 100644 lisp/+dired.el (limited to 'lisp/+dired.el') diff --git a/lisp/+dired.el b/lisp/+dired.el deleted file mode 100644 index 2e42c19..0000000 --- a/lisp/+dired.el +++ /dev/null @@ -1,28 +0,0 @@ -;;; +dired.el -*- lexical-binding: t -*- - -;;; Code: - -(with-eval-after-load 'vertico - (defun +dired-goto-file (file) - "ADVICE for `dired-goto-file' to make RET call `vertico-exit'." - (interactive ; stolen from `dired-goto-file' - (prog1 - (list (dlet ((vertico-map (copy-keymap vertico-map))) - (define-key vertico-map (kbd "RET") #'vertico-exit) - (expand-file-name (read-file-name "Goto file: " - (dired-current-directory))))) - (push-mark))) - (dired-goto-file file))) - -;;; [[https://www.reddit.com/r/emacs/comments/u2lf9t/weekly_tips_tricks_c_thread/i4n9aoa/?context=3][Dim files in .gitignore]] - -(defun +dired-dim-git-ignores () - "Dim out .gitignore contents" - (require 'vc) - (when-let ((ignores (vc-default-ignore-completion-table 'git ".gitignore")) - (exts (make-local-variable 'completion-ignored-extensions))) - (dolist (item ignores) - (add-to-list exts item)))) - -(provide '+dired) -;;; +dired.el ends here -- cgit 1.4.1-21-gabe81