'Dwim' commands for navigating subtrees

[yuhan0]

I cobbled together these two functions to simulate the behaviour of left/right keys in various file tree GUIs, like MacOS Finder's list view or the VS Code sidebar. But when pressing left at the root level or right at an already expanded tree, instead of being a no-op it tries to DWIM and navigates up / into the directory.

dirvish-dwim-keys.mp4

It's a small change but it really made it more intuitive to navigate around with my existing muscle memory :)
Not sure if this merits being included in the main repo but I thought others might benefit.

(defun +dirvish-expand-subtree-or-open ()
  "Expand the subtree if at a dirline and not using a layout, otherwise open the file."
  (interactive)
  (if (or (dirvish-subtree--expanded-p)
          (car (dv-layout (dirvish-curr))))
      (dirvish-find-entry-a (dired-get-file-for-visit))
    (condition-case err (dirvish-subtree--insert)
      ('file-error (dirvish-find-entry-a (dired-get-file-for-visit)))
      ('error (message "%s" (cdr err))))))

(defun +dirvish-collapse-subtree-or-up ()
  "Collapse the subtree if at a dirline, otherwise navigate to the parent subtree or directory."
  (interactive)
  (if (dirvish-subtree--expanded-p)
      (progn
        (dired-next-line 1)
        (dirvish-subtree-remove))
    (unless (dirvish-subtree-up)
      (dired-up-directory))))