Pārlūkot izejas kodu

Fix name

master
10sr pirms 6 gadiem
vecāks
revīzija
8b3eade333
Parakstījis: 10sr GPG atslēgas ID: 7BEC428194130EB2
1 mainītis faili ar 4 papildinājumiem un 4 dzēšanām
  1. +4
    -4
      emacs.el

+ 4
- 4
emacs.el Parādīt failu

@@ -2194,12 +2194,12 @@ initializing."
(with-current-buffer (get-buffer-create bname)
(cd root)
(let* ((trees (git-worktree-get-current-trees))
(branch-max-length
(branch-max-size
(apply 'max
(cl-loop for e in trees
when (plist-get e :branch)
collect (length (plist-get e :branch)))))
(worktree-max-length
(worktree-max-size
(apply 'max
(cl-loop for e in trees
when (plist-get e :worktree)
@@ -2213,8 +2213,8 @@ initializing."
(plist-get f :head))))
trees))
(setq tabulated-list-format
`[("Branch" ,branch-max-length t)
("Worktree" ,worktree-max-length t)
`[("Branch" ,branch-max-size t)
("Worktree" ,worktree-max-size t)
("Head" -1 t)])
(git-worktree-mode)
(current-buffer)))))


Notiek ielāde…
Atcelt
Saglabāt