emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

General cleanup

Browse source
This commit is contained in:
Henrik Lissner 2016-04-04 12:06:47 -04:00
parent 7bf28b5ad5
commit ca9f76bfa6
6 changed files with 49 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

17
core/core-defuns.el
View file

@ -223,18 +223,17 @@ to abort the minibuffer."
(let (message-log-max)
(if (and delete-selection-mode transient-mark-mode mark-active)
(setq deactivate-mark t)
;; (when (get-buffer "*Completions*")
;; (delete-windows-on "*Completions*"))
(abort-recursive-edit))))
(defun narf-reload ()
"Reload `load-path', in case you updated cask while emacs was open!"
(interactive)
(setq load-path (append (list narf-private-dir narf-core-dir narf-modules-dir narf-packages-dir)
(f-directories narf-core-dir nil t)
(f-directories narf-modules-dir nil t)
(f-directories narf-packages-dir)
narf--load-path)))
"Reload `load-path', in case you updated cask while emacs was open!"
(interactive)
(setq load-path (append (list narf-private-dir narf-core-dir narf-modules-dir narf-packages-dir)
(f-directories narf-core-dir nil t)
(f-directories narf-modules-dir nil t)
(f-directories narf-packages-dir)
(f-directories (expand-file-name "../bootstrap" narf-packages-dir))
narf--load-path)))
(provide 'core-defuns)
;;; core-defuns.el ends here

32
core/core-project.el
View file

@ -97,23 +97,23 @@
(evil-set-initial-state 'neotree-mode 'motion)
(add-hook! neotree-mode 'narf|neotree-init-keymap)
(defun narf|neotree-init-keymap ()
(map! (:map evil-motion-state-local-map
"ESC" 'neotree-hide
[escape] 'neotree-hide
"q" 'neotree-hide
(map! :map evil-motion-state-local-map
"ESC" 'neotree-hide
[escape] 'neotree-hide
"q" 'neotree-hide
"RET" 'neotree-enter
"J" 'neotree-select-next-sibling-node
"K" 'neotree-select-previous-sibling-node
"H" 'neotree-select-up-node
"L" 'neotree-select-down-node
"v" 'neotree-enter-vertical-split
"s" 'neotree-enter-horizontal-split
"c" 'neotree-create-node
"d" 'neotree-delete-node
"g" 'neotree-refresh
"r" 'neotree-rename-node
"R" 'neotree-change-root)))
"RET" 'neotree-enter
"J" 'neotree-select-next-sibling-node
"K" 'neotree-select-previous-sibling-node
"H" 'neotree-select-up-node
"L" 'neotree-select-down-node
"v" 'neotree-enter-vertical-split
"s" 'neotree-enter-horizontal-split
"c" 'neotree-create-node
"d" 'neotree-delete-node
"g" 'neotree-refresh
"r" 'neotree-rename-node
"R" 'neotree-change-root))
(after! projectile
(setq projectile-switch-project-action 'neotree-projectile-action))