Browse Source

Fix function name

master
10sr 5 years ago
parent
commit
5ffc7a0158
Signed by: 10sr GPG Key ID: 7BEC428194130EB2
1 changed files with 3 additions and 3 deletions
  1. +3
    -3
      emacs.el

+ 3
- 3
emacs.el View File

@@ -2120,12 +2120,12 @@ initializing."
(bname (format "*GitWorktree<%s>*" name)))
(with-current-buffer (get-buffer-create bname)
(cd root)
(git-worktree--set-tabulated-list-mmode-variables)
(git-worktree--set-tabulated-list-mode-variables)
(git-worktree-mode)
(current-buffer))))
;; ((:worktree "/Users/10sr/.dotfiles" :head "5e7457a8d49ef6a517cdf39d038ba5fdf98dc68e" :branch "refs/heads/master") (:worktree "/Users/10sr/.dotfiles/b1" :head "fa7d868076d807692e35f82ae23596c903fd1117" :branch "refs/heads/b1"))

(defun git-worktree--set-tabulated-list-mmode-variables ()
(defun git-worktree--set-tabulated-list-mode-variables ()
"Set variables for `tabulated-list-mode'."
(let ((trees (git-worktree-get-current-trees)))
(setq tabulated-list-entries
@@ -2233,7 +2233,7 @@ initializing."
"Major mode for browsing recently opened files and directories."
(setq tabulated-list-padding 2)
(add-hook 'tabulated-list-revert-hook
'git-worktree--set-tabulated-list-mmode-variables
'git-worktree--set-tabulated-list-mode-variables
nil
t)
(tabulated-list-init-header)


Loading…
Cancel
Save