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

(define-key global-map (kbd "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")))

(define-key global-map (kbd "C-c t") 'bard/open-terminal-emulator)

(provide 'bard-terminal.el)