term-cd-current-buffer

dougm · Apr 21, 2014 · f40f440 · f40f440
1 parent ca1b36c
commit f40f440
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 1 deletion.
diff --git a/custom/eshell.el b/custom/eshell.el
@@ -92,5 +92,5 @@
     (delete-other-windows)))
 
 ;; key bindings
-(global-set-key (kbd "C-c !") 'eshell-cd-current-buffer)
+(global-set-key (kbd "C-c `") 'eshell-cd-current-buffer)
 (global-set-key (kbd "C-c s") 'toggle-eshell-visor)
diff --git a/custom/term.el b/custom/term.el
@@ -22,6 +22,16 @@
 
 (setq multi-term-program "bash")
 
+(defun term-cd-current-buffer ()
+  "multi-term-next and cd to directory of current-buffer."
+  (interactive)
+  (let ((dir default-directory))
+    (multi-term-next)
+    (unless (string= dir default-directory)
+      (term-send-raw-string (format "cd %s\n" dir))
+      (term-send-raw-string "\C-l"))))
+
+(global-set-key (kbd "C-c !") 'term-cd-current-buffer)
 (global-set-key (kbd "C-c t") 'multi-term-next)
 (global-set-key (kbd "C-c T") 'multi-term)
 (global-set-key (kbd "C-c v") 'vagrant-tramp-term)