Fix function name

emacs.el

@@ -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)