|
@@ -731,14 +731,15 @@ found, otherwise returns nil." |
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
|
;; file handling |
|
|
;; file handling |
|
|
|
|
|
|
|
|
'(when (autoload-eval-lazily 'fzf) |
|
|
|
|
|
;; Too slow! |
|
|
|
|
|
;; (set-variable 'fzf/executable "sk") |
|
|
|
|
|
;; (set-variable 'fzf/args "--color bw --print-query") |
|
|
|
|
|
;; Modified from hardcoded default to include directories |
|
|
|
|
|
(let ((defcmd "set -o pipefail; command find -L . -mindepth 1 \\( -path '*/\\.*' -o -fstype 'sysfs' -o -fstype 'devfs' -o -fstype 'devtmpfs' -o -fstype 'proc' \\) -prune -o -print 2> /dev/null | cut -b3-")) |
|
|
|
|
|
(setenv "FZF_DEFAULT_COMMAND" defcmd)) |
|
|
|
|
|
(define-key ctl-x-map (kbd "C-f") 'fzf)) |
|
|
|
|
|
|
|
|
(when (autoload-eval-lazily 'fzf) |
|
|
|
|
|
;; Too slow! |
|
|
|
|
|
;; (set-variable 'fzf/executable "sk") |
|
|
|
|
|
;; (set-variable 'fzf/args "--color bw --print-query") |
|
|
|
|
|
;; Modified from hardcoded default to include directories |
|
|
|
|
|
(let ((defcmd "set -o pipefail; command find -L . -mindepth 1 \\( -path '*/\\.*' -o -fstype 'sysfs' -o -fstype 'devfs' -o -fstype 'devtmpfs' -o -fstype 'proc' \\) -prune -o -print 2> /dev/null | cut -b3-")) |
|
|
|
|
|
(setenv "FZF_DEFAULT_COMMAND" defcmd)) |
|
|
|
|
|
;; (define-key ctl-x-map (kbd "C-f") 'fzf) |
|
|
|
|
|
) |
|
|
|
|
|
|
|
|
(when (safe-require-or-eval 'recently) |
|
|
(when (safe-require-or-eval 'recently) |
|
|
(recently-mode 1)) |
|
|
(recently-mode 1)) |
|
|