|
|
@@ -1,6 +1,6 @@ |
|
|
;;; emacs.el --- 10sr emacs initialization |
|
|
;;; emacs.el --- 10sr emacs initialization |
|
|
|
|
|
|
|
|
;; Time-stamp: <2018-10-17 16:27:32 JST 10sr> |
|
|
|
|
|
|
|
|
;; Time-stamp: <2018-10-17 16:46:15 JST 10sr> |
|
|
|
|
|
|
|
|
;;; Code: |
|
|
;;; Code: |
|
|
|
|
|
|
|
|
@@ -2439,6 +2439,7 @@ Result will be inserted into current buffer." |
|
|
buf)) |
|
|
buf)) |
|
|
|
|
|
|
|
|
;; TODO: Store view history |
|
|
;; TODO: Store view history |
|
|
|
|
|
;; TODO: Open current file or directory if available |
|
|
(defun git-walktree--open-noselect (commitish path object) |
|
|
(defun git-walktree--open-noselect (commitish path object) |
|
|
"Open git tree buffer of COMMITISH. |
|
|
"Open git tree buffer of COMMITISH. |
|
|
When PATH was given and non-nil open that, otherwise open root tree. |
|
|
When PATH was given and non-nil open that, otherwise open root tree. |
|
|
@@ -2518,7 +2519,6 @@ Otherwise buffer's `default-directory' is always repository root." |
|
|
:type 'boolean |
|
|
:type 'boolean |
|
|
:group 'git-walktree) |
|
|
:group 'git-walktree) |
|
|
|
|
|
|
|
|
;; TODO: Use this |
|
|
|
|
|
(defcustom git-walktree-reuse-tree-buffer t |
|
|
(defcustom git-walktree-reuse-tree-buffer t |
|
|
"Non-nil to reuse buffer for treeish object." |
|
|
"Non-nil to reuse buffer for treeish object." |
|
|
:type 'boolean |
|
|
:type 'boolean |
|
|
|
