Parcourir la source

Add my-fzf-or-find-file

master
10sr il y a 5 ans
Parent
révision
b2becc55a2
Signé par: 10sr ID de la clé GPG: 7BEC428194130EB2
1 fichiers modifiés avec 8 ajouts et 1 suppressions
  1. +8
    -1
      emacs.el

+ 8
- 1
emacs.el Voir le fichier

@@ -760,7 +760,14 @@ found, otherwise returns nil."
"cut -b3-")))
(setenv "FZF_DEFAULT_COMMAND" defcmd))
(set-variable 'fzf/window-height 45)
;; (define-key ctl-x-map (kbd "C-f") 'fzf)
(defun my-fzf-or-find-file ()
"Call fzf if usable or call find-file."
(declare (interactive-only t))
(interactive)
(if (and (file-remote-p default-directory))
(call-interactively 'find-file)
(fzf)))
(define-key ctl-x-map (kbd "C-f") 'my-fzf-or-find-file)
)

(when (safe-require-or-eval 'recently)


Chargement…
Annuler
Enregistrer