update of packages

This commit is contained in:
2023-11-04 19:26:41 +01:00
parent e162a12b58
commit 3b54a3236d
726 changed files with 297673 additions and 34585 deletions

View File

@@ -1,6 +1,6 @@
;;; treemacs.el --- A tree style file viewer package -*- lexical-binding: t -*-
;; Copyright (C) 2022 Alexander Miller
;; Copyright (C) 2023 Alexander Miller
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
@@ -32,6 +32,7 @@
(require 'treemacs-logging)
(require 'treemacs-rendering)
(require 'treemacs-annotations)
(require 'treemacs-async)
(eval-when-compile
(require 'inline)
@@ -540,9 +541,13 @@ IS-FILE?: Bool"
;; update only the part that changed to keep things smooth
;; for files that's just their parent, for directories we have to take
;; flattening into account
(if (treemacs-button-get created-under-btn :collapsed)
(treemacs-update-node (treemacs-button-get (treemacs-button-get created-under-btn :parent) :path))
(treemacs-update-node (treemacs-button-get created-under-btn :path))))
(-let [path-to-update
(if (treemacs-button-get created-under-btn :collapsed)
(treemacs-button-get (treemacs-button-get created-under-btn :parent) :path)
(treemacs-button-get created-under-btn :path))]
(treemacs-update-node path-to-update)
(when (treemacs--non-simple-git-mode-enabled)
(treemacs-update-single-file-git-state path-to-update))))
(treemacs-goto-file-node path-to-create project)
(recenter))
(treemacs-pulse-on-success