;;; tree.el --- Configures tree representation -*- lexical-bindings: t -*- ;;; Commentary: ;;; Code: ;; (defun treemacs--split-window-advice (original-split-function &rest args) ;; (-let [w (treemacs--is-visible?)] ;; (unwind-protect ;; (progn ;; (when w (set-window-parameter w 'window-side treemacs-position)) ;; (apply original-split-function args)) ;; (when w (set-window-parameter w 'window-side treemacs-position))))) ;; (advice-add 'split-window-right :around #'treemacs--split-window-advice) (use-package treemacs :ensure t :defer t) (provide 'ux/tree) ;;; tree.el ends here.