bth/minmo
Watch
1
Fork
You've already forked minmo
 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

minmo : set branch from untracked

Browse source
This commit is contained in:
bth 2026-05-27 12:35:42 -07:00
commit cd9eab5091
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
packages/minmo.el
View file

@ -125,13 +125,13 @@ Uses the fast `vc-state' cache rather than synchronous git calls."
(eq (vc-responsible-backend buffer-file-name t) 'Git)) (eq (vc-responsible-backend buffer-file-name t) 'Git))
;; vc-git-state directly queries git ;; vc-git-state directly queries git
(let ((state (vc-git-state buffer-file-name)) (let ((state (vc-git-state buffer-file-name)))
(branch (minmo--fetch-vc-branch buffer-file-name))) (setq minmo--vc-branch-cache (minmo--fetch-vc-branch buffer-file-name))
(setq minmo--vc-untracked-cache (setq minmo--vc-untracked-cache
(pcase state (pcase state
;; NOTE: we need the space prefix to match the output of vc-mode: ;; NOTE: we need the space prefix to match the output of vc-mode:
('unregistered (concat " :" branch " " (minmo--status 'nofile/untracked 'git))) ('unregistered (minmo--status 'nofile/untracked 'git))
('ignored (concat " :" branch " " (minmo--status 'readonly/ignored 'git))) ('ignored (minmo--status 'readonly/ignored 'git))
(_ nil)))))) (_ nil))))))
;; NOTE: update the state when the file state changes ;; NOTE: update the state when the file state changes