jessieh/adwaita-dark-theme
jessieh/adwaita-dark-theme
1
Fork 0
Code Issues 1 Pull Requests Releases Activity

Fix neotree root directory button definition

Browse Source
This commit is contained in:
Jessie Hildebrandt 2022-12-30 00:50:57 -05:00
parent a60e943f36
commit 81c2ab75bc
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
adwaita-dark-theme.el
View File

@ -869,15 +869,15 @@
'display `((space :align-to (- right 0 1))))) 'display `((space :align-to (- right 0 1)))))
'face '(nil) 'face '(nil)
'follow-link t 'follow-link t
'neo-full-path (neo-path--updir node) 'neo-full-path (directory-file-name node)
'keymap (let ((button-keymap (make-sparse-keymap))) 'keymap (let ((button-keymap (copy-keymap neotree-dir-button-keymap)))
(define-key button-keymap [mouse-2] (lambda () (define-key button-keymap [mouse-2] (lambda ()
(interactive) (interactive)
(neotree-hidden-file-toggle))) (neotree-hidden-file-toggle)))
(define-key button-keymap [mouse-3] (lambda () (define-key button-keymap [mouse-3] (lambda ()
(interactive) (interactive)
(mouse-set-point last-input-event) (mouse-set-point last-input-event)
(neotree-change-root))) (neotree-select-up-node)))
button-keymap) button-keymap)
'help-echo "mouse-1: Toggle hidden files\nmouse-3: Move root up one directory") 'help-echo "mouse-1: Toggle hidden files\nmouse-3: Move root up one directory")
(neo-buffer--newline-and-begin)) (neo-buffer--newline-and-begin))