git-subtree-dir: users/wpcarro git-subtree-mainline:464bbcb15cgit-subtree-split:24f5a642afChange-Id: I6105b3762b79126b3488359c95978cadb3efa789
		
			
				
	
	
		
			53 lines
		
	
	
	
		
			1.7 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
			
		
		
	
	
			53 lines
		
	
	
	
		
			1.7 KiB
		
	
	
	
		
			EmacsLisp
		
	
	
	
	
	
;;; wpc-dired.el --- My dired preferences -*- lexical-binding: t -*-
 | 
						|
 | 
						|
;; Author: William Carroll <wpcarro@gmail.com>
 | 
						|
;; Version: 0.0.1
 | 
						|
;; URL: https://git.wpcarro.dev/wpcarro/briefcase
 | 
						|
;; Package-Requires: ((emacs "25.1"))
 | 
						|
 | 
						|
;;; Commentary:
 | 
						|
;; File management in Emacs, if learned and configured properly, should be
 | 
						|
;; capable to reduce my dependency on the terminal.
 | 
						|
 | 
						|
;;; Code:
 | 
						|
 | 
						|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | 
						|
;; Dependencies
 | 
						|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | 
						|
 | 
						|
(require 'macros)
 | 
						|
(require 'general)
 | 
						|
 | 
						|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | 
						|
;; Configuration
 | 
						|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 | 
						|
 | 
						|
(progn
 | 
						|
  (require 'dired)
 | 
						|
  (setq dired-recursive-copies 'always
 | 
						|
        dired-recursive-deletes 'top
 | 
						|
        dired-dwim-target t)
 | 
						|
  (setq dired-listing-switches "-la --group-directories-first")
 | 
						|
  (general-define-key
 | 
						|
   :keymaps 'dired-mode-map
 | 
						|
   :states '(normal)
 | 
						|
   ;; Overriding some KBDs defined in the evil-collection module.
 | 
						|
   "o" #'dired-find-file-other-window
 | 
						|
   "<SPC>" nil ;; This unblocks some of my leader-prefixed KBDs.
 | 
						|
   "s" nil ;; This unblocks my window-splitting KBDs.
 | 
						|
   "c" #'find-file
 | 
						|
   "f" #'project-find-file
 | 
						|
   "-" (lambda () (interactive) (find-alternate-file "..")))
 | 
						|
  (general-add-hook 'dired-mode-hook
 | 
						|
                    (list (macros-enable dired-hide-details-mode)
 | 
						|
                          #'auto-revert-mode)))
 | 
						|
 | 
						|
(progn
 | 
						|
  (require 'locate)
 | 
						|
  (general-define-key
 | 
						|
   :keymaps 'locate-mode-map
 | 
						|
   :states 'normal
 | 
						|
   "o" #'dired-find-file-other-window))
 | 
						|
 | 
						|
(provide 'wpc-dired)
 | 
						|
;;; wpc-dired.el ends here
 |