mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Drop support for wpc/find-file

Browse source 
Cleaning things up...
This commit is contained in:
William Carroll 2020-08-14 14:53:59 +01:00
parent 56b503c573
commit 7e2dcc97cc
2 changed files with 1 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/.emacs.d/wpc/functions.el
View file

@ -23,14 +23,6 @@
(call-interactively #'paredit-reindent-defun) (call-interactively #'paredit-reindent-defun)
(call-interactively #'clojure-align)) (call-interactively #'clojure-align))
(defun wpc/find-file ()
"Prefer project-based file-finding if inside of project; otherwise gracefully fallback."
(interactive)
(with-current-buffer (current-buffer)
(if (projectile-project-p)
(call-interactively #'counsel-projectile-find-file)
(call-interactively #'find-file))))
(defun wpc/find-file-split (filename) (defun wpc/find-file-split (filename)
"Creates a window split and then edits `filename'." "Creates a window split and then edits `filename'."
(interactive) (interactive)

2
emacs/.emacs.d/wpc/wpc-dired.el
View file

@ -24,7 +24,7 @@
"<SPC>" nil ;; This unblocks some of my leader-prefixed KBDs. "<SPC>" nil ;; This unblocks some of my leader-prefixed KBDs.
"s" nil ;; This unblocks my window-splitting KBDs. "s" nil ;; This unblocks my window-splitting KBDs.
"c" #'find-file "c" #'find-file
"f" #'wpc/find-file "f" #'project-find-file
"-" (lambda () (interactive) (find-alternate-file ".."))) "-" (lambda () (interactive) (find-alternate-file "..")))
(general-add-hook 'dired-mode-hook (general-add-hook 'dired-mode-hook
(list (enable dired-hide-details-mode) (list (enable dired-hide-details-mode)