summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authormattkae <mattkae@protonmail.com>2022-10-21 07:41:42 -0400
committermattkae <mattkae@protonmail.com>2022-10-21 07:41:42 -0400
commit8ba3ffad71c8854c3a0bfe4d9bda6ab221da439f (patch)
treed69c0d0c7f22fb14930a2f981021c52cc658ac47 /lisp
parentb2faaae5840a3a134e24ae24eb65593669098039 (diff)
Refreshing the window and navigating back to current buffer after file ops
Diffstat (limited to 'lisp')
-rw-r--r--lisp/general.el15
-rw-r--r--lisp/lisp.el4
2 files changed, 14 insertions, 5 deletions
diff --git a/lisp/general.el b/lisp/general.el
index 2428518..4bbf6f0 100644
--- a/lisp/general.el
+++ b/lisp/general.el
@@ -146,7 +146,8 @@
(interactive)
(call-interactively #'make-empty-file)
(neotree-show)
- (neotree-refresh))
+ (neotree-refresh)
+ (other-window -1))
(bind-key* (kbd "M-n") 'my-create-file)
@@ -155,7 +156,8 @@
(interactive)
(call-interactively #'make-directory)
(neotree-show)
- (neotree-refresh))
+ (neotree-refresh)
+ (other-window -1))
(bind-key* (kbd "M-N") 'my-create-directory)
(defun my-delete-file ()
@@ -163,7 +165,8 @@
(interactive)
(call-interactively #'delete-file)
(neotree-show)
- (neotree-refresh))
+ (neotree-refresh)
+ (other-window -1))
(bind-key* (kbd "M-d") 'my-delete-file)
(defun my-delete-directory ()
@@ -171,7 +174,8 @@
(interactive)
(call-interactively #'delete-directory)
(neotree-show)
- (neotree-refresh))
+ (neotree-refresh)
+ (other-window -1))
(bind-key* (kbd "M-D") 'my-delete-directory)
(defun my-rename-file ()
@@ -179,7 +183,8 @@
(interactive)
(call-interactively #'rename-file)
(neotree-show)
- (neotree-refresh))
+ (neotree-refresh)
+ (other-window -1))
(bind-key* (kbd "M-r") 'my-rename-file)
;; Company mode for code completion
diff --git a/lisp/lisp.el b/lisp/lisp.el
index c313d53..01199ca 100644
--- a/lisp/lisp.el
+++ b/lisp/lisp.el
@@ -7,6 +7,10 @@
(company-mode t)
)
+(require 'projectile)
+(with-eval-after-load 'projectile
+ (add-to-list 'projectile-globally-ignored-directories "elpa"))
+
(add-hook 'emacs-lisp-mode-hook 'setup-lisp)
(provide 'lisp)
;;; lisp.el ends here