From f3eedc82d43ba24b36ce2f60cff0ab5e324d0b40 Mon Sep 17 00:00:00 2001 From: Franck Cuny Date: Thu, 27 Apr 2017 09:02:52 -0700 Subject: [Emacs] Remove configuration for term I do not use it, since it's too slow and not as convenient as using a real terminal. --- emacs.d/init.el | 38 -------------------------------------- 1 file changed, 38 deletions(-) diff --git a/emacs.d/init.el b/emacs.d/init.el index 1881e45..cfff32d 100644 --- a/emacs.d/init.el +++ b/emacs.d/init.el @@ -427,44 +427,6 @@ ;; install swiper :ensure t) -(use-package term - ;; configuration to manage multiple terminals inside emacs - :bind (("C-x t" . fc/open-term) - ("C-x m" . fc/switch-to-term-buffer)) - - :config - (progn - (defun fc/make-term (new-buffer-name cmd &rest switches) - (setq term-ansi-buffer-name (concat "<" new-buffer-name ">")) - (setq term-ansi-buffer-name (generate-new-buffer-name term-ansi-buffer-name)) - (setq term-ansi-buffer-name (apply 'make-term term-ansi-buffer-name cmd nil switches)) - (set-buffer term-ansi-buffer-name) - (term-mode) - (term-char-mode) - (term-set-escape-char ?\C-x) - (switch-to-buffer term-ansi-buffer-name)) - - (defun fc/open-term (name) - (interactive "sName: ") - (fc/make-term name "bash")) - - (defun fc/list-term-buffers () - "Returns a list of term buffers" - (delq nil - (mapcar (lambda(x) - (set-buffer x) - (when (string= major-mode "term-mode") - (buffer-name))) - (buffer-list)))) - - (defun fc/switch-to-term-buffer () - "Switch to a term buffer." - (interactive) - (let ((collection (fc/list-term-buffers))) - (ivy-read "term buffers:" collection - :action (lambda (x) (switch-to-buffer x)) - :caller 'fc/find-term-buffers))))) - (use-package tramp ;; configuration for tramp :config -- cgit 1.4.1