[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 0ce6cfd 2/2: Merge remote-tracking branch 'ztree/master'
From: |
Alexey Veretennikov |
Subject: |
[elpa] master 0ce6cfd 2/2: Merge remote-tracking branch 'ztree/master' |
Date: |
Sat, 13 Jun 2015 09:20:35 +0000 |
branch: master
commit 0ce6cfdfbe59a8b7955e3a2c9156e1bbdb2516fc
Merge: 449466a 9de243f
Author: Alexey Veretennikov <address@hidden>
Commit: Alexey Veretennikov <address@hidden>
Merge remote-tracking branch 'ztree/master'
Added added variable ztree-dir-move-focus; if set move the focus
to opened editor window when the user press Enter
---
packages/ztree/ztree-dir.el | 17 ++++++++++++++---
1 files changed, 14 insertions(+), 3 deletions(-)
diff --git a/packages/ztree/ztree-dir.el b/packages/ztree/ztree-dir.el
index 7506b84..d52aef1 100644
--- a/packages/ztree/ztree-dir.el
+++ b/packages/ztree/ztree-dir.el
@@ -54,6 +54,14 @@
"Hidden files regexp.
By default all filest starting with dot '.', including . and ..")
+;;
+;; Configurable variables
+;;
+
+(defvar ztree-dir-move-focus nil
+ "If set to true moves the focus to opened window when the
+user press RETURN on file ")t
+
;;
;; Faces
@@ -92,9 +100,12 @@ By default all filest starting with dot '.', including .
and ..")
If HARD is non-nil, the file is opened in another window.
Otherwise, the ztree window is used to find the file."
(when (and (stringp node) (file-readable-p node))
- (if hard
- (save-selected-window (find-file-other-window node))
- (find-file node))))
+ (cond ((and hard ztree-dir-move-focus)
+ (find-file-other-window node))
+ (hard
+ (save-selected-window (find-file-other-window node)))
+ (t
+ (find-file node)))))
;;;###autoload
(defun ztree-dir (path)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master 0ce6cfd 2/2: Merge remote-tracking branch 'ztree/master',
Alexey Veretennikov <=