aboutsummaryrefslogtreecommitdiff
path: root/bard-elisp/bard-terminal.el
blob: 22eef6671d27f94b6ec9120a4a9ce768a27f2552 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
(defun bard/open-terminal-in-current-directory ()
  "Open a terminal in the current working directory."
  (interactive)
  (let ((default-directory default-directory))
    (term "/bin/bash")))

(global-set-key (kbd "C-c t") 'bard/open-terminal-in-current-directory)

(defun bard/open-terminal-emulator ()
  "Open a terminal in the current working directory."
  (interactive)
  (let ((default-directory default-directory))
    (start-process "st terminal" nil "st")))

(with-eval-after-load "dired-mode"
  (define-key dired-mode-map (kbd "C-c C-t") 'bard/open-terminal-emulator))

(provide 'bard-terminal.el)