update packages

lisp/treemacs/treemacs-core-utils.el

@@ -1,6 +1,6 @@
 ;;; treemacs.el --- A tree style file viewer package -*- lexical-binding: t -*-
 
-;; Copyright (C) 2023 Alexander Miller
+;; Copyright (C) 2024 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
@@ -90,7 +90,7 @@
   treemacs--git-status-process
   treemacs--non-simple-git-mode-enabled
   treemacs-update-single-file-git-state
-  treemacs--collapsed-dirs-process)
+  treemacs--flattened-dirs-process)
 
 (treemacs-import-functions-from "treemacs-dom"
   treemacs-on-collapse
@@ -1258,6 +1258,14 @@ treemacs window."
         (unless (eq next-window current-window)
           (select-window next-window))))))
 
+(defun treemacs--pre-sorted-list (items)
+  "Return a lambda that includes sorting metadata for `completing-read'.
+Ensures that the order of ITEMS is not changed during completion."
+  (lambda (string pred action)
+    (pcase action
+      ('metadata `(metadata (display-sort-function . ,#'identity)))
+      (_ (complete-with-action action items string pred)))))
+
 (provide 'treemacs-core-utils)
 
 ;;; treemacs-core-utils.el ends here