45 lines
1.3 KiB
EmacsLisp
45 lines
1.3 KiB
EmacsLisp
|
;;; treemacs.el --- AMACS -*- lexical-binding: t -*-
|
||
|
|
;;
|
||
|
|
;; Copyright 2021 Practically.io All rights reserved
|
||
|
|
;;
|
||
|
|
;; Use of this source is governed by a BSD-style
|
||
|
|
;; licence that can be found in the LICENCE file or at
|
||
|
|
;; https://www.practically.io/copyright/
|
||
|
|
|
||
|
|
(defun spacemacs/treemacs-project-toggle ()
|
||
|
|
"Toggle and add the current project to treemacs if not already added."
|
||
|
|
(interactive)
|
||
|
|
(if (eq (treemacs-current-visibility) 'visible)
|
||
|
|
(delete-window (treemacs-get-local-window))
|
||
|
|
(let ((path (projectile-ensure-project (projectile-project-root)))
|
||
|
|
(name (projectile-project-name)))
|
||
|
|
(unless (treemacs-current-workspace)
|
||
|
|
(treemacs--find-workspace))
|
||
|
|
(treemacs-do-add-project-to-workspace path name)
|
||
|
|
(treemacs-select-window))))
|
||
|
|
|
||
|
|
(use-package treemacs
|
||
|
|
:ensure t
|
||
|
|
:defer t
|
||
|
|
:init
|
||
|
|
(with-eval-after-load 'winum
|
||
|
|
(define-key winum-keymap (kbd "M-0") #'treemacs-select-window)))
|
||
|
|
|
||
|
|
(use-package treemacs-magit
|
||
|
|
:after treemacs magit
|
||
|
|
:ensure t
|
||
|
|
:config
|
||
|
|
;; Force magit status to go full screen
|
||
|
|
(setq-default git-magit-status-fullscreen t))
|
||
|
|
|
||
|
|
(use-package treemacs-evil
|
||
|
|
:after treemacs evil
|
||
|
|
:ensure t)
|
||
|
|
|
||
|
|
(use-package treemacs-projectile
|
||
|
|
:after treemacs projectile
|
||
|
|
:ensure t)
|
||
|
|
|
||
|
|
(use-package treemacs-all-the-icons
|
||
|
|
:hook (treemacs-mode . (lambda () (treemacs-load-theme 'all-the-icons))))
|