Browse Source

CHange func name

master
10sr 7 years ago
parent
commit
9e4aa05a82
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

@@ -2327,7 +2327,7 @@ TYPE is target object type."
(current-buffer)))))) (current-buffer))))))


;; TODO: Change func name ;; TODO: Change func name
(defun git-walktree--replace-into (target)
(defun git-walktree--replace-into-buffer (target)
"Replace TARGET buffer contents with that of current buffer." "Replace TARGET buffer contents with that of current buffer."
(let ((buf (current-buffer))) (let ((buf (current-buffer)))
(with-current-buffer target (with-current-buffer target
@@ -2386,7 +2386,7 @@ TYPE is target object type."


treeish) treeish)
;; TODO: Somehow text properties are stripped here ;; TODO: Somehow text properties are stripped here
(git-walktree--replace-into buf))))
(git-walktree--replace-into-buffer buf))))
(git-walktree-mode) (git-walktree-mode)
(set-buffer-modified-p nil) (set-buffer-modified-p nil)


@@ -2440,7 +2440,7 @@ Result will be inserted into current buffer."
"cat-file" "cat-file"
"-p" "-p"
blob) blob)
(git-walktree--replace-into buf)))
(git-walktree--replace-into-buffer buf)))
(setq git-walktree-buffer-file-name (setq git-walktree-buffer-file-name
(concat (git-walktree--git-plumbing "rev-parse" (concat (git-walktree--git-plumbing "rev-parse"
"--show-toplevel") "--show-toplevel")


Loading…
Cancel
Save