dotfiles/emacs
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Move open-*-in-current-directory bindings after we have bind-key

Browse Source
This commit is contained in:
Adam Goldsmith 2019-01-12 15:29:42 -05:00
parent ce69a63f40
commit 51ade13af7
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
.emacs.d/init.el
View File

@ -19,18 +19,6 @@
(when (fboundp 'tool-bar-mode) (when (fboundp 'tool-bar-mode)
(tool-bar-mode -1)) (tool-bar-mode -1))
;;;; not sure where to put this
(defun open-thunar-in-current-directory ()
(interactive)
(call-process "thunar" nil 0 nil "."))
(defun open-term-in-current-directory ()
(interactive)
(call-process "alacritty" nil 0 nil))
(bind-key "<s-return>" 'open-term-in-current-directory)
(bind-key "s-t" 'open-thunar-in-current-directory)
;;;; enable disabled functions ;;;; enable disabled functions
(put 'upcase-region 'disabled nil) (put 'upcase-region 'disabled nil)
(put 'downcase-region 'disabled nil) (put 'downcase-region 'disabled nil)
@ -54,6 +42,18 @@
:config :config
(use-package quelpa-use-package :ensure)) (use-package quelpa-use-package :ensure))
;;;; not sure where to put this
(defun open-thunar-in-current-directory ()
(interactive)
(call-process "thunar" nil 0 nil "."))
(defun open-term-in-current-directory ()
(interactive)
(call-process "alacritty" nil 0 nil))
(bind-key "<s-return>" 'open-term-in-current-directory)
(bind-key "s-t" 'open-thunar-in-current-directory)
;;;; internal packages ;;;; internal packages
(use-package ibuffer (use-package ibuffer
:bind ("C-x C-b" . ibuffer) :bind ("C-x C-b" . ibuffer)