branch: master
commit af5f09766945f8377f147b5092e124e8edcf4539
Author: justbur <[email protected]>
Commit: Oleh Krehel <[email protected]>
counsel.el (counsel-locate-action-extern): Make interactive
* counsel.el (counsel-find-file-extern): Add as alias for the locate
action for discoverability
Fixes #605
---
counsel.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/counsel.el b/counsel.el
index abf390e..27754f4 100644
--- a/counsel.el
+++ b/counsel.el
@@ -1377,6 +1377,7 @@ string - the full shell command to run."
(defun counsel-locate-action-extern (x)
"Use xdg-open shell command on X."
+ (interactive (list (read-file-name "File: ")))
(call-process shell-file-name nil
nil nil
shell-command-switch
@@ -1386,6 +1387,8 @@ string - the full shell command to run."
"xdg-open")
(shell-quote-argument x))))
+(defalias 'counsel-find-file-extern 'counsel-locate-action-extern)
+
(declare-function dired-jump "dired-x")
(defun counsel-locate-action-dired (x)
