20 lines
631 B
EmacsLisp
20 lines
631 B
EmacsLisp
;;; 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.
|