10sr преди 6 години
родител
ревизия
9db4f8a5ce
Подписан от: 10sr GPG ключ ID: C384BB17CBB19347
променени са 1 файла, в които са добавени 3 реда и са изтрити 3 реда
  1. +3
    -3
      emacs.el

+ 3
- 3
emacs.el Целия файл

@@ -1,6 +1,6 @@
;;; emacs.el --- 10sr emacs initialization

;; Time-stamp: <2018-10-16 23:14:49 JST 10sr>
;; Time-stamp: <2018-10-16 23:18:27 JST 10sr>

;;; Code:

@@ -2704,7 +2704,7 @@ When collection has just one element, return without asking."
If current path was not found in the parent revision try to go up path."
(interactive)
(if git-walktree-current-commitish
(let ((parents (git-walktree--parent-sha1 git-walktree-current-commitish)))
(let ((parents (git-walktree--parent-commitid git-walktree-current-commitish)))
;; TODO: Use if
(cl-case (length parents)
(0
@@ -2720,7 +2720,7 @@ If current path was not found in the parent revision try to go up path."
;; What is object id?
;; commit id?
;; commit sha1?
(defun git-walktree--parent-sha1 (commitish)
(defun git-walktree--parent-commitid (commitish)
"Return list of parent commits of COMMITISH in sha1 string."
(let ((type (git-walktree--git-plumbing "cat-file"
"-t"


Зареждане…
Отказ
Запис